home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: ArcFS Archive
(archive/arcFS).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| ArcFS Archive (archive/arcFS)
| magic
| Supported |
| 100%
| file
| RISC OS archive (ArcFS format)
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Acorn ArcFS Archive
| default
| |
| 100%
| gt2
| Kopftext: 'Archive'
| default (weak)
| |
| 100%
| detectItEasy
| Archive: ArcFS
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 40 02 00 00 54 03 00 00 |Archive.|@...T...|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 4d 61 74 68 73 56 | 31 30 00 00 ff ff ff ff |.!MathsV|10......|
|00000070| 44 fd ff ff a3 43 09 fa | 00 00 00 00 ff ff ff ff |D....C..|........|
|00000080| 1c 02 00 80 82 21 42 6f | 6f 74 00 00 00 00 00 00 |.....!Bo|ot......|
|00000090| 5d 00 00 00 43 eb ff ff | 01 0d d0 50 03 00 65 a1 |]...C...|...P..e.|
|000000a0| 5d 00 00 00 24 00 00 00 | 82 21 48 65 6c 70 00 00 |]...$...|.!Help..|
|000000b0| 00 00 00 00 47 00 00 00 | 43 eb ff ff a2 d2 5b 45 |....G...|C.....[E|
|000000c0| 03 00 1e a3 47 00 00 00 | a5 00 00 00 82 21 52 75 |....G...|.....!Ru|
|000000d0| 6e 00 04 00 00 00 00 00 | 5a 00 00 00 42 eb ff ff |n.......|Z...B...|
|000000e0| 23 40 61 97 03 00 a7 90 | 5a 00 00 00 10 01 00 00 |#@a.....|Z.......|
|000000f0| 82 21 52 75 6e 49 6d 61 | 67 65 00 00 e4 71 00 00 |.!RunIma|ge...q..|
|00000100| 45 fb ff ff 2e 64 2d 33 | 03 00 6e 7e e4 71 00 00 |E....d-3|..n~.q..|
|00000110| 8e 01 00 00 82 21 53 70 | 72 69 74 65 73 00 00 00 |.....!Sp|rites...|
|00000120| e4 03 00 00 43 f9 ff ff | fa 2e 7e 06 03 00 33 e8 |....C...|..~...3.|
|00000130| e4 03 00 00 96 73 00 00 | 82 43 4f 4e 46 49 47 00 |.....s..|.CONFIG.|
|00000140| 00 00 00 00 49 00 00 00 | 43 fd ff ff ec 96 52 47 |....I...|C.....RG|
|00000150| 03 00 90 ee 49 00 00 00 | 9e 77 00 00 82 44 61 74 |....I...|.w...Dat|
|00000160| 61 62 61 73 65 00 00 00 | ad 00 00 00 42 fd ff ff |abase...|....B...|
|00000170| 95 56 df 97 03 00 0b 91 | ad 00 00 00 0b 78 00 00 |.V......|.....x..|
|00000180| 82 48 65 6c 70 00 04 00 | 00 00 00 00 5f 42 00 00 |.Help...|...._B..|
|00000190| 43 dc f7 ff 9f d1 5b 45 | 03 00 d3 c2 5f 42 00 00 |C.....[E|...._B..|
|000001a0| dc 78 00 00 82 48 65 6c | 70 52 65 61 64 65 72 00 |.x...Hel|pReader.|
|000001b0| 48 0a 00 00 43 f8 ff ff | ec 0c d0 50 03 00 f4 1b |H...C...|...P....|
|000001c0| 48 0a 00 00 5f bb 00 00 | 82 4f 64 64 73 4e 45 6e |H..._...|.OddsNEn|
|000001d0| 64 73 00 00 ff ff ff ff | 44 fd ff ff 48 49 09 fa |ds......|D...HI..|
|000001e0| 00 00 00 00 ff ff ff ff | f8 01 00 80 82 44 69 66 |........|.....Dif|
|000001f0| 66 65 72 65 6e 74 00 00 | 70 03 00 00 42 fb ff ff |ferent..|p...B...|
|00000200| 13 6f ea 98 03 00 8c 7d | 70 03 00 00 cb c5 00 00 |.o.....}|p.......|
|00000210| 82 49 6e 74 65 67 72 61 | 6c 00 00 00 36 03 00 00 |.Integra|l...6...|
|00000220| 42 fb ff ff 7e 20 ef 98 | 03 00 86 a4 36 03 00 00 |B...~ ..|....6...|
|00000230| 5f c9 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |_.......|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 c3 00 04 00 |........|........|
|00000260| 00 00 00 00 81 00 00 00 | 42 eb ff ff cc 9f b4 63 |........|B......c|
|00000270| 03 0c bf a3 7e 00 00 00 | 00 00 00 00 00 00 00 00 |....~...|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 00 00 00 00 46 69 6c 65 | 44 61 74 61 82 21 42 6f |....File|Data.!Bo|
|00000360| 6f 74 00 00 00 00 00 00 | 5d 00 00 00 43 eb ff ff |ot......|]...C...|
|00000370| 01 0d d0 50 03 00 65 a1 | 49 63 6f 6e 53 70 72 69 |...P..e.|IconSpri|
|00000380| 74 65 73 20 3c 4f 62 65 | 79 24 44 69 72 3e 2e 21 |tes <Obe|y$Dir>.!|
|00000390| 53 70 72 69 74 65 73 0a | 7c 20 54 68 69 73 20 66 |Sprites.|| This f|
|000003a0| 69 6c 65 20 68 61 73 20 | 62 65 65 6e 20 69 6e 6e |ile has |been inn|
|000003b0| 6f 63 75 6c 61 74 65 64 | 20 61 67 61 69 6e 73 74 |oculated| against|
|000003c0| 20 74 68 65 20 45 78 74 | 65 6e 64 20 56 69 72 75 | the Ext|end Viru|
|000003d0| 73 0a 7c 7c ff 46 69 6c | 65 44 61 74 61 82 21 48 |s.||.Fil|eData.!H|
|000003e0| 65 6c 70 00 00 00 00 00 | 00 47 00 00 00 43 eb ff |elp.....|.G...C..|
|000003f0| ff a2 d2 5b 45 03 00 1e | a3 7c 48 65 6c 70 52 65 |...[E...|.|HelpRe|
|00000400| 61 64 65 72 0a 57 69 6d | 70 53 6c 6f 74 20 34 38 |ader.Wim|pSlot 48|
|00000410| 6b 20 34 38 6b 0a 52 75 | 6e 20 3c 4f 62 65 79 24 |k 48k.Ru|n <Obey$|
|00000420| 44 69 72 3e 2e 48 65 6c | 70 52 65 61 64 65 72 20 |Dir>.Hel|pReader |
|00000430| 3c 4f 62 65 79 24 44 69 | 72 3e 2e 48 65 6c 70 0a |<Obey$Di|r>.Help.|
|00000440| 46 69 6c 65 44 61 74 61 | 82 21 52 75 6e 00 04 00 |FileData|.!Run...|
|00000450| 00 00 00 00 5a 00 00 00 | 42 eb ff ff 23 40 61 97 |....Z...|B...#@a.|
|00000460| 03 00 a7 90 7c 20 3e 20 | 24 2e 21 4d 61 74 68 73 |....| > |$.!Maths|
|00000470| 56 35 2e 21 52 75 6e 0a | 7c 0a 7c 20 77 72 69 74 |V5.!Run.||.| writ|
|00000480| 74 65 6e 20 62 79 20 52 | 2e 54 68 6f 72 6e 62 75 |ten by R|.Thornbu|
|00000490| 72 72 6f 77 20 31 32 74 | 68 20 4d 61 79 20 31 39 |rrow 12t|h May 19|
|000004a0| 39 30 0a 7c 0a 52 75 6e | 20 3c 4f 62 65 79 24 44 |90.|.Run| <Obey$D|
|000004b0| 69 72 3e 2e 21 52 75 6e | 49 6d 61 67 65 0a 46 69 |ir>.!Run|Image.Fi|
|000004c0| 6c 65 44 61 74 61 82 21 | 52 75 6e 49 6d 61 67 65 |leData.!|RunImage|
|000004d0| 00 00 e4 71 00 00 45 fb | ff ff 2e 64 2d 33 03 00 |...q..E.|...d-3..|
|000004e0| 6e 7e 0d 00 0a 11 f4 20 | 3e 20 21 52 75 6e 49 6d |n~..... |> !RunIm|
|000004f0| 61 67 65 0d 00 14 17 f4 | 20 62 79 20 52 2e 20 54 |age.....| by R. T|
|00000500| 68 6f 72 6e 62 75 72 72 | 6f 77 0d 00 1e 46 f4 20 |hornburr|ow...F. |
|00000510| 54 68 69 73 20 70 72 6f | 67 72 61 6d 20 69 73 20 |This pro|gram is |
|00000520| 50 55 42 4c 49 43 20 44 | 4f 4d 41 49 4e 2e 20 20 |PUBLIC D|OMAIN. |
|00000530| 41 4c 4c 20 69 74 73 20 | 61 73 73 6f 63 69 61 74 |ALL its |associat|
|00000540| 65 64 20 66 69 6c 65 73 | 20 4d 55 53 54 20 62 65 |ed files| MUST be|
|00000550| 0d 00 28 35 f4 20 69 63 | 6e 63 6c 75 64 65 64 20 |..(5. ic|ncluded |
|00000560| 77 69 74 68 20 69 74 2e | 20 20 52 65 6c 65 61 73 |with it.| Releas|
|00000570| 65 20 64 61 74 65 20 32 | 35 74 68 20 4a 75 6c 79 |e date 2|5th July|
|00000580| 20 31 39 39 31 0d 00 32 | 0c 64 65 62 75 67 25 3d | 1991..2|.debug%=|
|00000590| b9 0d 00 3c 06 eb 30 0d | 00 46 12 ee 20 85 20 f2 |...<..0.|.F.. . .|
|000005a0| 73 79 73 5f 65 72 72 6f | 72 0d 00 50 0e ef 31 39 |sys_erro|r..P..19|
|000005b0| 2c 30 2c 34 3b 30 3b 0d | 00 5a 09 f2 69 6e 69 74 |,0,4;0;.|.Z..init|
|000005c0| 0d 00 64 12 ee 20 85 20 | f2 73 79 73 5f 65 72 72 |..d.. . |.sys_err|
|000005d0| 6f 72 0d 00 6e 05 f5 0d | 00 78 0d f2 6d 61 69 6e |or..n...|.x..main|
|000005e0| 6d 65 6e 75 0d 00 82 0b | fd 20 71 75 69 74 25 0d |menu....|. quit%.|
|000005f0| 00 8c 06 eb 30 0d 00 96 | 08 2a 46 58 34 0d 00 a0 |....0...|.*FX4...|
|00000600| 05 e0 0d 00 aa 05 3a 0d | 00 b4 0a dd f2 69 6e 69 |......:.|.....ini|
|00000610| 74 0d 00 be 12 f2 67 65 | 74 5f 63 6f 6e 66 69 67 |t.....ge|t_config|
|00000620| 75 72 65 0d 00 c8 2b de | 20 73 74 6f 72 65 64 5f |ure...+.| stored_|
|00000630| 66 75 6e 63 24 28 6d 61 | 78 29 2c 73 74 6f 72 65 |func$(ma|x),store|
|00000640| 64 5f 62 61 73 69 63 76 | 24 28 6d 61 78 29 0d 00 |d_basicv|$(max)..|
|00000650| d2 27 de 20 73 74 6f 72 | 65 64 5f 78 6d 69 6e 28 |.'. stor|ed_xmin(|
|00000660| 6d 61 78 29 2c 73 74 6f | 72 65 64 5f 78 6d 61 78 |max),sto|red_xmax|
|00000670| 28 6d 61 78 29 0d 00 dc | 27 de 20 73 74 6f 72 65 |(max)...|'. store|
|00000680| 64 5f 79 6d 69 6e 28 6d | 61 78 29 2c 73 74 6f 72 |d_ymin(m|ax),stor|
|00000690| 65 64 5f 79 6d 61 78 28 | 6d 61 78 29 0d 00 e6 15 |ed_ymax(|max)....|
|000006a0| de 20 66 72 65 65 5f 73 | 70 61 63 65 28 6d 61 78 |. free_s|pace(max|
|000006b0| 29 0d 00 f0 2d de 20 66 | 75 6e 63 24 28 31 30 29 |)...-. f|unc$(10)|
|000006c0| 2c 62 61 73 69 63 76 24 | 28 31 30 29 2c 78 6d 69 |,basicv$|(10),xmi|
|000006d0| 6e 28 31 30 29 2c 78 6d | 61 78 28 31 30 29 0d 00 |n(10),xm|ax(10)..|
|000006e0| fa 17 de 20 79 6d 69 6e | 28 31 30 29 2c 79 6d 61 |... ymin|(10),yma|
|000006f0| 78 28 31 30 29 0d 01 04 | 29 71 75 69 74 25 3d a3 |x(10)...|)quit%=.|
|00000700| 3a 66 75 6e 63 74 69 6f | 6e 25 3d 30 3a 73 74 6f |:functio|n%=0:sto|
|00000710| 72 65 64 25 3d 30 3a 40 | 25 3d 26 34 30 41 0d 01 |red%=0:@|%=&40A..|
|00000720| 0e 72 72 61 64 25 3d a3 | 3a 41 3d 31 3a 42 3d 31 |.rrad%=.|:A=1:B=1|
|00000730| 3a 43 3d 31 3a 44 3d 31 | 3a 45 3d 31 3a 46 3d 31 |:C=1:D=1|:E=1:F=1|
|00000740| 3a 47 3d 31 3a 48 3d 31 | 3a 49 3d 31 3a 4a 3d 31 |:G=1:H=1|:I=1:J=1|
|00000750| 3a 4b 3d 31 3a 4c 3d 31 | 3a 4d 3d 31 3a 4e 3d 31 |:K=1:L=1|:M=1:N=1|
|00000760| 3a 4f 3d 31 3a 50 3d 31 | 3a 51 3d 31 3a 52 3d 31 |:O=1:P=1|:Q=1:R=1|
|00000770| 3a 53 3d 31 3a 54 3d 31 | 3a 55 3d 31 3a 56 3d 31 |:S=1:T=1|:U=1:V=1|
|00000780| 3a 57 3d 31 3a 58 3d 30 | 3a 59 3d 30 3a 5a 3d 31 |:W=1:X=0|:Y=0:Z=1|
|00000790| 0d 01 18 1c f2 6c 6f 61 | 64 28 64 65 66 61 75 6c |.....loa|d(defaul|
|000007a0| 74 5f 64 61 74 61 62 61 | 73 65 24 29 0d 01 22 0f |t_databa|se$)..".|
|000007b0| f2 63 68 61 72 61 63 74 | 65 72 73 0d 01 2c 2e e7 |.charact|ers..,..|
|000007c0| 20 73 63 72 65 65 6e 5f | 70 72 6f 67 24 3c 3e 22 | screen_|prog$<>"|
|000007d0| 3c 4e 4f 4e 45 3e 22 20 | 8c 20 ff 28 73 63 72 65 |<NONE>" |. .(scre|
|000007e0| 65 6e 5f 70 72 6f 67 24 | 29 0d 01 36 0a 2a 46 58 |en_prog$|)..6.*FX|
|000007f0| 34 2c 31 0d 01 40 05 e1 | 0d 01 4a 05 3a 0d 01 54 |4,1..@..|..J.:..T|
|00000800| 13 dd f2 67 65 74 5f 63 | 6f 6e 66 69 67 75 72 65 |...get_c|onfigure|
|00000810| 0d 01 5e 08 ea 20 46 25 | 0d 01 68 29 f2 62 75 69 |..^.. F%|..h).bui|
|00000820| 6c 64 5f 63 6f 6e 66 69 | 67 75 72 65 3a 46 25 3d |ld_confi|gure:F%=|
|00000830| a4 6f 70 65 6e 69 6e 28 | 22 43 4f 4e 46 49 47 22 |.openin(|"CONFIG"|
|00000840| 29 0d 01 72 2f e7 20 46 | 25 3d 30 20 f2 73 61 76 |)..r/. F|%=0 .sav|
|00000850| 65 5f 63 6f 6e 66 69 67 | 75 72 65 3a 46 25 3d a4 |e_config|ure:F%=.|
|00000860| 6f 70 65 6e 69 6e 28 22 | 43 4f 4e 46 49 47 22 29 |openin("|CONFIG")|
|00000870| 0d 01 7c 16 e7 20 46 25 | 3d 30 20 f2 65 72 72 6f |..|.. F%|=0 .erro|
|00000880| 72 28 32 29 3a e1 0d 01 | 86 1a e8 23 46 25 2c 64 |r(2):...|...#F%,d|
|00000890| 65 66 61 75 6c 74 5f 64 | 61 74 61 62 61 73 65 24 |efault_d|atabase$|
|000008a0| 0d 01 90 15 e8 23 46 25 | 2c 73 63 72 65 65 6e 5f |.....#F%|,screen_|
|000008b0| 64 75 6d 70 24 0d 01 9a | 15 e8 23 46 25 2c 73 63 |dump$...|..#F%,sc|
|000008c0| 72 65 65 6e 5f 70 72 6f | 67 24 0d 01 a4 18 e8 23 |reen_pro|g$.....#|
|000008d0| 46 25 2c 72 6f 6f 74 5f | 64 69 72 65 63 74 6f 72 |F%,root_|director|
|000008e0| 79 24 0d 01 ae 10 e8 23 | 46 25 2c 70 6f 69 6e 74 |y$.....#|F%,point|
|000008f0| 73 25 0d 01 b8 16 e8 23 | 46 25 2c 63 6f 6e 66 69 |s%.....#|F%,confi|
|00000900| 67 75 72 65 5f 6f 6b 25 | 0d 01 c2 0c e8 23 46 25 |gure_ok%|.....#F%|
|00000910| 2c 6d 61 78 0d 01 cc 11 | e8 23 46 25 2c 70 72 69 |,max....|.#F%,pri|
|00000920| 6e 74 65 72 25 0d 01 d6 | 0f e8 23 46 25 2c 6f 73 |nter%...|..#F%,os|
|00000930| 5f 6f 6b 25 0d 01 e0 15 | e8 23 46 25 2c 63 6f 6e |_ok%....|.#F%,con|
|00000940| 66 69 67 5f 70 61 73 73 | 24 0d 01 ea 08 d9 23 46 |fig_pass|$.....#F|
|00000950| 25 0d 01 f4 05 e1 0d 01 | fe 05 3a 0d 02 08 13 dd |%.......|..:.....|
|00000960| a4 6f 70 65 6e 69 6e 28 | 66 69 6c 65 24 29 0d 02 |.openin(|file$)..|
|00000970| 12 38 e7 20 63 6f 6d 70 | 75 74 65 72 24 3d 22 4e |.8. comp|uter$="N|
|00000980| 49 4d 42 55 53 22 20 8c | 20 3d 8e 28 72 6f 6f 74 |IMBUS" .| =.(root|
|00000990| 5f 64 69 72 65 63 74 6f | 72 79 24 2b 22 5c 22 2b |_directo|ry$+"\"+|
|000009a0| 66 69 6c 65 24 29 0d 02 | 1c 21 3d 8e 28 72 6f 6f |file$)..|.!=.(roo|
|000009b0| 74 5f 64 69 72 65 63 74 | 6f 72 79 24 2b 22 2e 22 |t_direct|ory$+"."|
|000009c0| 2b 66 69 6c 65 24 29 0d | 02 26 05 3a 0d 02 30 14 |+file$).|.&.:..0.|
|000009d0| dd a4 6f 70 65 6e 6f 75 | 74 28 66 69 6c 65 24 29 |..openou|t(file$)|
|000009e0| 0d 02 3a 38 e7 20 63 6f | 6d 70 75 74 65 72 24 3d |..:8. co|mputer$=|
|000009f0| 22 4e 49 4d 42 55 53 22 | 20 8c 20 3d ae 28 72 6f |"NIMBUS"| . =.(ro|
|00000a00| 6f 74 5f 64 69 72 65 63 | 74 6f 72 79 24 2b 22 5c |ot_direc|tory$+"\|
|00000a10| 22 2b 66 69 6c 65 24 29 | 0d 02 44 21 3d ae 28 72 |"+file$)|..D!=.(r|
|00000a20| 6f 6f 74 5f 64 69 72 65 | 63 74 6f 72 79 24 2b 22 |oot_dire|ctory$+"|
|00000a30| 2e 22 2b 66 69 6c 65 24 | 29 0d 02 4e 05 3a 0d 02 |."+file$|)..N.:..|
|00000a40| 58 0e dd a4 63 6f 6d 70 | 75 74 65 72 0d 02 62 10 |X...comp|uter..b.|
|00000a50| 63 6f 6d 70 3d a6 28 2d | 32 35 36 29 0d 02 6c 17 |comp=.(-|256)..l.|
|00000a60| e7 20 63 6f 6d 70 3e 31 | 36 30 20 8c 20 3d 22 41 |. comp>1|60 . ="A|
|00000a70| 52 43 22 0d 02 76 18 e7 | 20 63 6f 6d 70 3d 30 20 |RC"..v..| comp=0 |
|00000a80| 8c 20 3d 22 4e 49 4d 42 | 55 53 22 0d 02 80 0a 3d |. ="NIMB|US"....=|
|00000a90| 22 42 42 43 22 0d 02 8a | 05 3a 0d 02 94 15 dd f2 |"BBC"...|.:......|
|00000aa0| 62 75 69 6c 64 5f 63 6f | 6e 66 69 67 75 72 65 0d |build_co|nfigure.|
|00000ab0| 02 9e 1f f4 20 79 6f 75 | 20 63 61 6e 20 61 6c 74 |.... you| can alt|
|00000ac0| 65 72 20 74 68 65 73 65 | 20 6c 69 6e 65 73 0d 02 |er these| lines..|
|00000ad0| a8 1c 63 6f 6e 66 69 67 | 5f 70 61 73 73 24 3d 22 |..config|_pass$="|
|00000ae0| 43 4f 4e 46 49 47 55 52 | 45 22 0d 02 b2 17 63 6f |CONFIGUR|E"....co|
|00000af0| 6d 70 75 74 65 72 24 3d | a4 63 6f 6d 70 75 74 65 |mputer$=|.compute|
|00000b00| 72 0d 02 bc 49 f4 20 4d | 53 2d 44 4f 53 20 75 73 |r...I. M|S-DOS us|
|00000b10| 65 72 73 20 61 6c 74 65 | 72 20 6e 65 78 74 20 6c |ers alte|r next l|
|00000b20| 69 6e 65 20 74 6f 20 64 | 61 74 61 20 64 72 69 76 |ine to d|ata driv|
|00000b30| 65 20 28 6d 75 73 74 20 | 68 61 76 65 20 77 72 69 |e (must |have wri|
|00000b40| 74 65 20 61 63 63 65 73 | 73 29 0d 02 c6 2f e7 20 |te acces|s).../. |
|00000b50| 63 6f 6d 70 75 74 65 72 | 24 3d 22 4e 49 4d 42 55 |computer|$="NIMBU|
|00000b60| 53 22 20 8c 20 72 6f 6f | 74 5f 64 69 72 65 63 74 |S" . roo|t_direct|
|00000b70| 6f 72 79 24 3d 22 4e 3a | 22 0d 02 d0 3e e7 20 63 |ory$="N:|"...>. c|
|00000b80| 6f 6d 70 75 74 65 72 24 | 3d 22 41 52 43 22 20 8c |omputer$|="ARC" .|
|00000b90| 20 72 6f 6f 74 5f 64 69 | 72 65 63 74 6f 72 79 24 | root_di|rectory$|
|00000ba0| 3d 22 3c 4f 62 65 79 24 | 44 69 72 3e 22 3a ff 22 |="<Obey$|Dir>":."|
|00000bb0| 4b 65 79 30 20 2a 22 0d | 02 da 2b e7 20 63 6f 6d |Key0 *".|..+. com|
|00000bc0| 70 75 74 65 72 24 3d 22 | 42 42 43 22 20 8c 20 72 |puter$="|BBC" . r|
|00000bd0| 6f 6f 74 5f 64 69 72 65 | 63 74 6f 72 79 24 3d 22 |oot_dire|ctory$="|
|00000be0| 24 22 0d 02 e4 4b f4 20 | 54 68 65 73 65 20 76 61 |$"...K. |These va|
|00000bf0| 6c 75 65 73 20 61 72 65 | 20 64 65 66 61 75 6c 74 |lues are| default|
|00000c00| 2c 20 74 68 65 79 20 63 | 61 6e 20 62 65 20 61 6c |, they c|an be al|
|00000c10| 74 65 72 65 64 20 66 72 | 6f 6d 20 63 6f 6e 66 69 |tered fr|om confi|
|00000c20| 67 75 72 61 74 69 6f 6e | 20 6d 65 6e 75 0d 02 ee |guration| menu...|
|00000c30| 1e 64 65 66 61 75 6c 74 | 5f 64 61 74 61 62 61 73 |.default|_databas|
|00000c40| 65 24 3d 22 3c 4e 4f 4e | 45 3e 22 0d 02 f8 2f 73 |e$="<NON|E>".../s|
|00000c50| 63 72 65 65 6e 5f 64 75 | 6d 70 24 3d 22 3c 4e 4f |creen_du|mp$="<NO|
|00000c60| 4e 45 3e 22 3a 73 63 72 | 65 65 6e 5f 70 72 6f 67 |NE>":scr|een_prog|
|00000c70| 24 3d 22 3c 4e 4f 4e 45 | 3e 22 0d 03 02 13 63 6f |$="<NONE|>"....co|
|00000c80| 6e 66 69 67 75 72 65 5f | 6f 6b 25 3d a3 0d 03 0c |nfigure_|ok%=....|
|00000c90| 18 6d 61 78 3d 31 30 30 | 3a 70 6f 69 6e 74 73 25 |.max=100|:points%|
|00000ca0| 3d 31 30 30 30 0d 03 16 | 0e 70 72 69 6e 74 65 72 |=1000...|.printer|
|00000cb0| 25 3d b9 0d 03 20 0c 6f | 73 5f 6f 6b 25 3d a3 0d |%=... .o|s_ok%=..|
|00000cc0| 03 2a 05 e1 0d 03 34 05 | 3a 0d 03 3e 14 dd f2 73 |.*....4.|:..>...s|
|00000cd0| 61 76 65 5f 63 6f 6e 66 | 69 67 75 72 65 0d 03 48 |ave_conf|igure..H|
|00000ce0| 08 ea 20 46 25 0d 03 52 | 19 46 25 3d a4 6f 70 65 |.. F%..R|.F%=.ope|
|00000cf0| 6e 6f 75 74 28 22 43 4f | 4e 46 49 47 22 29 0d 03 |nout("CO|NFIG")..|
|00000d00| 5c 16 e7 20 46 25 3d 30 | 20 f2 65 72 72 6f 72 28 |\.. F%=0| .error(|
|00000d10| 31 29 3a e1 0d 03 66 1a | f1 23 46 25 2c 64 65 66 |1):...f.|.#F%,def|
|00000d20| 61 75 6c 74 5f 64 61 74 | 61 62 61 73 65 24 0d 03 |ault_dat|abase$..|
|00000d30| 70 15 f1 23 46 25 2c 73 | 63 72 65 65 6e 5f 64 75 |p..#F%,s|creen_du|
|00000d40| 6d 70 24 0d 03 7a 15 f1 | 23 46 25 2c 73 63 72 65 |mp$..z..|#F%,scre|
|00000d50| 65 6e 5f 70 72 6f 67 24 | 0d 03 84 18 f1 23 46 25 |en_prog$|.....#F%|
|00000d60| 2c 72 6f 6f 74 5f 64 69 | 72 65 63 74 6f 72 79 24 |,root_di|rectory$|
|00000d70| 0d 03 8e 10 f1 23 46 25 | 2c 70 6f 69 6e 74 73 25 |.....#F%|,points%|
|00000d80| 0d 03 98 16 f1 23 46 25 | 2c 63 6f 6e 66 69 67 75 |.....#F%|,configu|
|00000d90| 72 65 5f 6f 6b 25 0d 03 | a2 0c f1 23 46 25 2c 6d |re_ok%..|...#F%,m|
|00000da0| 61 78 0d 03 ac 11 f1 23 | 46 25 2c 70 72 69 6e 74 |ax.....#|F%,print|
|00000db0| 65 72 25 0d 03 b6 0f f1 | 23 46 25 2c 6f 73 5f 6f |er%.....|#F%,os_o|
|00000dc0| 6b 25 0d 03 c0 15 f1 23 | 46 25 2c 63 6f 6e 66 69 |k%.....#|F%,confi|
|00000dd0| 67 5f 70 61 73 73 24 0d | 03 ca 08 d9 23 46 25 0d |g_pass$.|....#F%.|
|00000de0| 03 d4 05 e1 0d 03 de 05 | 3a 0d 03 e8 11 dd f2 6c |........|:......l|
|00000df0| 6f 61 64 28 66 69 6c 65 | 24 29 0d 03 f2 0a ea 20 |oad(file|$)..... |
|00000e00| 46 25 2c 6e 0d 03 fc 21 | e7 20 66 69 6c 65 24 3d |F%,n...!|. file$=|
|00000e10| 22 22 20 84 20 66 69 6c | 65 24 3d 22 3c 4e 4f 4e |"" . fil|e$="<NON|
|00000e20| 45 3e 22 20 e1 0d 04 06 | 13 f4 20 6c 6f 61 64 20 |E>" ....|.. load |
|00000e30| 64 61 74 61 62 61 73 65 | 0d 04 10 15 46 25 3d a4 |database|....F%=.|
|00000e40| 6f 70 65 6e 69 6e 28 66 | 69 6c 65 24 29 0d 04 1a |openin(f|ile$)...|
|00000e50| 16 e7 20 46 25 3d 30 20 | f2 65 72 72 6f 72 28 34 |.. F%=0 |.error(4|
|00000e60| 29 3a e1 0d 04 24 10 e8 | 23 46 25 2c 73 74 6f 72 |):...$..|#F%,stor|
|00000e70| 65 64 25 0d 04 2e 13 e3 | 20 6e 3d 31 20 b8 20 73 |ed%.....| n=1 . s|
|00000e80| 74 6f 72 65 64 25 0d 04 | 38 2a e8 23 46 25 2c 73 |tored%..|8*.#F%,s|
|00000e90| 74 6f 72 65 64 5f 66 75 | 6e 63 24 28 6e 29 2c 73 |tored_fu|nc$(n),s|
|00000ea0| 74 6f 72 65 64 5f 62 61 | 73 69 63 76 24 28 6e 29 |tored_ba|sicv$(n)|
|00000eb0| 0d 04 42 26 e8 23 46 25 | 2c 73 74 6f 72 65 64 5f |..B&.#F%|,stored_|
|00000ec0| 78 6d 69 6e 28 6e 29 2c | 73 74 6f 72 65 64 5f 78 |xmin(n),|stored_x|
|00000ed0| 6d 61 78 28 6e 29 0d 04 | 4c 26 e8 23 46 25 2c 73 |max(n)..|L&.#F%,s|
|00000ee0| 74 6f 72 65 64 5f 79 6d | 69 6e 28 6e 29 2c 73 74 |tored_ym|in(n),st|
|00000ef0| 6f 72 65 64 5f 79 6d 61 | 78 28 6e 29 0d 04 56 16 |ored_yma|x(n)..V.|
|00000f00| e8 23 46 25 2c 66 72 65 | 65 5f 73 70 61 63 65 28 |.#F%,fre|e_space(|
|00000f10| 6e 29 0d 04 60 05 ed 0d | 04 6a 08 d9 23 46 25 0d |n)..`...|.j..#F%.|
|00000f20| 04 74 05 e1 0d 04 7e 05 | 3a 0d 04 88 11 dd f2 73 |.t....~.|:......s|
|00000f30| 61 76 65 28 66 69 6c 65 | 24 29 0d 04 92 0a ea 20 |ave(file|$)..... |
|00000f40| 6e 2c 66 25 0d 04 9c 2f | e7 20 66 69 6c 65 24 3d |n,f%.../|. file$=|
|00000f50| 22 22 20 84 20 66 69 6c | 65 24 3d 22 3c 4e 4f 4e |"" . fil|e$="<NON|
|00000f60| 45 3e 22 20 84 20 73 74 | 6f 72 65 64 25 3d 30 20 |E>" . st|ored%=0 |
|00000f70| 8c 20 e1 0d 04 a6 13 f4 | 20 73 61 76 65 20 64 61 |. ......| save da|
|00000f80| 74 61 62 61 73 65 0d 04 | b0 16 46 25 3d a4 6f 70 |tabase..|..F%=.op|
|00000f90| 65 6e 6f 75 74 28 66 69 | 6c 65 24 29 0d 04 ba 16 |enout(fi|le$)....|
|00000fa0| e7 20 46 25 3d 30 20 f2 | 65 72 72 6f 72 28 35 29 |. F%=0 .|error(5)|
|00000fb0| 3a e1 0d 04 c4 10 f1 23 | 46 25 2c 73 74 6f 72 65 |:......#|F%,store|
|00000fc0| 64 25 0d 04 ce 13 e3 20 | 6e 3d 31 20 b8 20 73 74 |d%..... |n=1 . st|
|00000fd0| 6f 72 65 64 25 0d 04 d8 | 2a f1 23 46 25 2c 73 74 |ored%...|*.#F%,st|
|00000fe0| 6f 72 65 64 5f 66 75 6e | 63 24 28 6e 29 2c 73 74 |ored_fun|c$(n),st|
|00000ff0| 6f 72 65 64 5f 62 61 73 | 69 63 76 24 28 6e 29 0d |ored_bas|icv$(n).|
|00001000| 04 e2 26 f1 23 46 25 2c | 73 74 6f 72 65 64 5f 78 |..&.#F%,|stored_x|
|00001010| 6d 69 6e 28 6e 29 2c 73 | 74 6f 72 65 64 5f 78 6d |min(n),s|tored_xm|
|00001020| 61 78 28 6e 29 0d 04 ec | 26 f1 23 46 25 2c 73 74 |ax(n)...|&.#F%,st|
|00001030| 6f 72 65 64 5f 79 6d 69 | 6e 28 6e 29 2c 73 74 6f |ored_ymi|n(n),sto|
|00001040| 72 65 64 5f 79 6d 61 78 | 28 6e 29 0d 04 f6 16 f1 |red_ymax|(n).....|
|00001050| 23 46 25 2c 66 72 65 65 | 5f 73 70 61 63 65 28 6e |#F%,free|_space(n|
|00001060| 29 0d 05 00 05 ed 0d 05 | 0a 08 d9 23 46 25 0d 05 |).......|...#F%..|
|00001070| 14 05 e1 0d 05 1e 05 3a | 0d 05 28 10 dd a4 63 65 |.......:|..(...ce|
|00001080| 6e 74 72 65 28 61 24 29 | 0d 05 32 18 3d c4 28 37 |ntre(a$)|..2.=.(7|
|00001090| 39 2d a9 61 24 29 81 32 | 2c 22 20 22 29 2b 61 24 |9-.a$).2|," ")+a$|
|000010a0| 0d 05 3c 05 3a 0d 05 46 | 0e dd a4 63 68 6f 70 28 |..<.:..F|...chop(|
|000010b0| 61 24 29 0d 05 50 1e e7 | 20 a9 61 24 3e 32 35 20 |a$)..P..| .a$>25 |
|000010c0| 8c 20 3d c0 61 24 2c 32 | 32 29 2b 22 20 2e 2e 2e |. =.a$,2|2)+" ...|
|000010d0| 22 0d 05 5a 07 3d 61 24 | 0d 05 64 05 3a 0d 05 6e |"..Z.=a$|..d.:..n|
|000010e0| 11 dd a4 65 6e 61 62 6c | 65 64 28 61 25 29 0d 05 |...enabl|ed(a%)..|
|000010f0| 78 25 e7 20 61 25 3d b9 | 20 8c 20 3d 22 45 6e 61 |x%. a%=.| . ="Ena|
|00001100| 62 6c 65 64 22 20 8b 20 | 3d 22 44 69 73 61 62 6c |bled" . |="Disabl|
|00001110| 65 64 22 0d 05 82 05 3a | 0d 05 8c 16 dd f2 73 68 |ed"....:|......sh|
|00001120| 6f 77 5f 66 6f 72 6d 75 | 6c 61 73 28 79 29 0d 05 |ow_formu|las(y)..|
|00001130| 96 07 ea 20 78 0d 05 a0 | 12 f1 8a 31 2c 79 29 c4 |... x...|...1,y).|
|00001140| 37 38 2c 22 5f 22 29 0d | 05 aa 48 f1 8a 31 2c 79 |78,"_").|..H..1,y|
|00001150| 2b 32 29 22 6e 22 8a 34 | 29 22 46 75 6e 63 74 69 |+2)"n".4|)"Functi|
|00001160| 6f 6e 22 8a 33 39 29 22 | 6d 69 6e 20 78 22 8a 34 |on".39)"|min x".4|
|00001170| 39 29 22 6d 61 78 20 78 | 22 8a 35 39 29 22 6d 69 |9)"max x|".59)"mi|
|00001180| 6e 20 79 22 8a 36 39 29 | 22 6d 61 78 20 79 22 0d |n y".69)|"max y".|
|00001190| 05 b4 0e e3 20 78 3d 31 | 20 b8 20 31 30 0d 05 be |.... x=1| . 10...|
|000011a0| 12 f1 8a 31 2c 79 2b 78 | 2b 32 29 22 22 3b 78 0d |...1,y+x|+2)"";x.|
|000011b0| 05 c8 41 e7 20 66 75 6e | 63 24 28 78 29 3c 3e 22 |..A. fun|c$(x)<>"|
|000011c0| 22 20 f1 8a 35 2c 79 2b | 78 2b 32 29 22 79 3d 22 |" ..5,y+|x+2)"y="|
|000011d0| 3b 66 75 6e 63 24 28 78 | 29 20 8b 20 f1 8a 32 30 |;func$(x|) . ..20|
|000011e0| 2c 79 2b 78 2b 32 29 22 | 3c 42 6c 61 6e 6b 3e 22 |,y+x+2)"|<Blank>"|
|000011f0| 0d 05 d2 50 f1 8a 34 30 | 2c 79 2b 78 2b 32 29 3b |...P..40|,y+x+2);|
|00001200| 78 6d 69 6e 28 78 29 3b | 8a 35 30 2c 79 2b 78 2b |xmin(x);|.50,y+x+|
|00001210| 32 29 3b 78 6d 61 78 28 | 78 29 3b 8a 36 30 2c 79 |2);xmax(|x);.60,y|
|00001220| 2b 78 2b 32 29 3b 79 6d | 69 6e 28 78 29 3b 8a 37 |+x+2);ym|in(x);.7|
|00001230| 30 2c 79 2b 78 2b 32 29 | 3b 79 6d 61 78 28 78 29 |0,y+x+2)|;ymax(x)|
|00001240| 0d 05 dc 05 ed 0d 05 e6 | 05 e1 0d 05 f0 05 3a 0d |........|......:.|
|00001250| 05 fa 1b dd f2 68 69 67 | 68 5f 66 6f 72 6d 75 6c |.....hig|h_formul|
|00001260| 61 28 79 2c 68 69 67 68 | 25 29 0d 06 04 0b fb 30 |a(y,high|%).....0|
|00001270| 3a fb 31 32 39 0d 06 0e | 1a f1 8a 31 2c 79 2b 68 |:.129...|...1,y+h|
|00001280| 69 67 68 25 2b 32 29 22 | 22 3b 68 69 67 68 25 0d |igh%+2)"|";high%.|
|00001290| 06 18 51 e7 20 66 75 6e | 63 24 28 68 69 67 68 25 |..Q. fun|c$(high%|
|000012a0| 29 3c 3e 22 22 20 f1 8a | 35 2c 79 2b 68 69 67 68 |)<>"" ..|5,y+high|
|000012b0| 25 2b 32 29 22 79 3d 22 | 3b 66 75 6e 63 24 28 68 |%+2)"y="|;func$(h|
|000012c0| 69 67 68 25 29 20 8b 20 | f1 8a 32 30 2c 79 2b 68 |igh%) . |..20,y+h|
|000012d0| 69 67 68 25 2b 32 29 22 | 3c 42 6c 61 6e 6b 3e 22 |igh%+2)"|<Blank>"|
|000012e0| 0d 06 22 70 f1 8a 34 30 | 2c 79 2b 68 69 67 68 25 |.."p..40|,y+high%|
|000012f0| 2b 32 29 3b 78 6d 69 6e | 28 68 69 67 68 25 29 3b |+2);xmin|(high%);|
|00001300| 8a 35 30 2c 79 2b 68 69 | 67 68 25 2b 32 29 3b 78 |.50,y+hi|gh%+2);x|
|00001310| 6d 61 78 28 68 69 67 68 | 25 29 3b 8a 36 30 2c 79 |max(high|%);.60,y|
|00001320| 2b 68 69 67 68 25 2b 32 | 29 3b 79 6d 69 6e 28 68 |+high%+2|);ymin(h|
|00001330| 69 67 68 25 29 3b 8a 37 | 30 2c 79 2b 68 69 67 68 |igh%);.7|0,y+high|
|00001340| 25 2b 32 29 3b 79 6d 61 | 78 28 68 69 67 68 25 29 |%+2);yma|x(high%)|
|00001350| 0d 06 2c 0b fb 31 3a fb | 31 32 38 0d 06 36 05 e1 |..,..1:.|128..6..|
|00001360| 0d 06 40 05 3a 0d 06 4a | 12 dd f2 73 68 6f 77 5f |..@.:..J|...show_|
|00001370| 74 69 6d 65 28 79 29 0d | 06 54 17 e7 20 63 6f 6d |time(y).|.T.. com|
|00001380| 70 75 74 65 72 24 3d 22 | 42 42 43 22 20 e1 0d 06 |puter$="|BBC" ...|
|00001390| 5e 1e f1 8a 35 30 2c 79 | 29 22 54 69 6d 65 3a 20 |^...50,y|)"Time: |
|000013a0| 22 3b c0 91 24 2c a9 91 | 24 2d 33 29 0d 06 68 05 |";..$,..|$-3)..h.|
|000013b0| e1 0d 06 72 05 3a 0d 06 | 7c 0b dd f2 74 69 74 6c |...r.:..||...titl|
|000013c0| 65 0d 06 86 4e e7 20 63 | 6f 6d 70 75 74 65 72 24 |e...N. c|omputer$|
|000013d0| 3d 22 4e 49 4d 42 55 53 | 22 20 f2 72 65 63 74 61 |="NIMBUS|" .recta|
|000013e0| 6e 67 6c 65 28 35 2c 35 | 2c 31 32 36 38 2c 39 38 |ngle(5,5|,1268,98|
|000013f0| 31 29 3a f2 72 65 63 74 | 61 6e 67 6c 65 28 31 30 |1):.rect|angle(10|
|00001400| 2c 31 30 2c 31 32 35 38 | 2c 39 37 31 29 3a e1 0d |,10,1258|,971):..|
|00001410| 06 90 39 f2 72 65 63 74 | 61 6e 67 6c 65 28 35 2c |..9.rect|angle(5,|
|00001420| 35 2c 31 32 36 38 2c 31 | 30 31 34 29 3a f2 72 65 |5,1268,1|014):.re|
|00001430| 63 74 61 6e 67 6c 65 28 | 31 30 2c 31 30 2c 31 32 |ctangle(|10,10,12|
|00001440| 35 38 2c 31 30 30 34 29 | 0d 06 9a 05 e1 0d 06 a4 |58,1004)|........|
|00001450| 05 3a 0d 06 ae 18 dd f2 | 72 65 63 74 61 6e 67 6c |.:......|rectangl|
|00001460| 65 28 78 2c 79 2c 77 2c | 68 29 0d 06 b8 28 ec 78 |e(x,y,w,|h)...(.x|
|00001470| 2c 79 3a df 20 78 2b 77 | 2c 79 3a df 20 78 2b 77 |,y:. x+w|,y:. x+w|
|00001480| 2c 79 2b 68 3a df 20 78 | 2c 79 2b 68 3a df 20 78 |,y+h:. x|,y+h:. x|
|00001490| 2c 79 0d 06 c2 05 e1 0d | 06 cc 05 3a 0d 06 d6 0e |,y......|...:....|
|000014a0| dd f2 6d 61 69 6e 6d 65 | 6e 75 0d 06 e0 0c ea 20 |..mainme|nu..... |
|000014b0| 4b 45 59 24 2c 78 0d 06 | ea 10 db 3a ef 31 39 2c |KEY$,x..|...:.19,|
|000014c0| 30 2c 34 3b 30 3b 0d 06 | f4 29 f1 8a 30 2c 34 29 |0,4;0;..|.)..0,4)|
|000014d0| a4 63 65 6e 74 72 65 28 | 22 4d 20 41 20 49 20 4e |.centre(|"M A I N|
|000014e0| 20 20 20 20 20 20 4d 20 | 45 20 4e 20 55 22 29 0d | M |E N U").|
|000014f0| 06 fe 31 f1 8a 32 2c 36 | 29 22 50 6c 65 61 73 65 |..1..2,6|)"Please|
|00001500| 20 73 65 6c 65 63 74 20 | 6f 70 74 69 6f 6e 20 77 | select |option w|
|00001510| 69 74 68 20 6e 75 6d 62 | 65 72 20 6b 65 79 3a 22 |ith numb|er key:"|
|00001520| 0d 07 08 64 e7 20 66 75 | 6e 63 74 69 6f 6e 25 3d |...d. fu|nction%=|
|00001530| 30 20 f1 8a 38 2c 31 30 | 29 22 2a 20 31 2e 2e 2e |0 ..8,10|)"* 1...|
|00001540| 2e 44 72 61 77 69 6e 67 | 2f 70 6c 6f 74 74 69 6e |.Drawing|/plottin|
|00001550| 67 20 6f 70 74 69 6f 6e | 73 22 20 8b 20 f1 8a 31 |g option|s" . ..1|
|00001560| 30 2c 31 30 29 22 31 2e | 2e 2e 2e 44 72 61 77 69 |0,10)"1.|...Drawi|
|00001570| 6e 67 2f 70 6c 6f 74 74 | 69 6e 67 20 6f 70 74 69 |ng/plott|ing opti|
|00001580| 6f 6e 73 22 0d 07 12 24 | f1 8a 31 30 2c 31 32 29 |ons"...$|..10,12)|
|00001590| 22 32 2e 2e 2e 2e 45 64 | 69 74 20 6c 69 6e 65 20 |"2....Ed|it line |
|000015a0| 64 65 74 61 69 6c 73 22 | 0d 07 1c 30 f1 8a 31 30 |details"|...0..10|
|000015b0| 2c 31 34 29 22 33 2e 2e | 2e 2e 53 74 6f 72 65 64 |,14)"3..|..Stored|
|000015c0| 20 6c 69 6e 65 73 20 64 | 61 74 61 62 61 73 65 20 | lines d|atabase |
|000015d0| 6f 70 74 69 6f 6e 73 22 | 0d 07 26 1d f1 8a 31 30 |options"|..&...10|
|000015e0| 2c 31 36 29 22 34 2e 2e | 2e 2e 43 61 6c 63 75 6c |,16)"4..|..Calcul|
|000015f0| 61 74 6f 72 22 0d 07 30 | 2a f1 8a 31 30 2c 31 38 |ator"..0|*..10,18|
|00001600| 29 22 35 2e 2e 2e 2e 4d | 61 74 68 65 6d 61 74 69 |)"5....M|athemati|
|00001610| 63 61 6c 20 6f 70 65 72 | 61 74 69 6f 6e 73 22 0d |cal oper|ations".|
|00001620| 07 3a 5a e7 20 63 6f 6e | 66 69 67 75 72 65 5f 6f |.:Z. con|figure_o|
|00001630| 6b 25 3d a3 20 f1 8a 38 | 2c 32 30 29 22 2a 20 36 |k%=. ..8|,20)"* 6|
|00001640| 2e 2e 2e 2e 43 6f 6e 66 | 69 67 75 72 65 20 70 72 |....Conf|igure pr|
|00001650| 6f 67 72 61 6d 22 20 8b | 20 f1 8a 31 30 2c 32 30 |ogram" .| ..10,20|
|00001660| 29 22 36 2e 2e 2e 2e 43 | 6f 6e 66 69 67 75 72 65 |)"6....C|onfigure|
|00001670| 20 70 72 6f 67 72 61 6d | 22 0d 07 44 71 e7 20 6f | program|"..Dq. o|
|00001680| 73 5f 6f 6b 25 3d a3 20 | f1 8a 38 2c 32 32 29 22 |s_ok%=. |..8,22)"|
|00001690| 2a 20 37 2e 2e 2e 2e 50 | 65 72 66 6f 72 6d 20 6f |* 7....P|erform o|
|000016a0| 70 65 72 61 74 69 6e 67 | 20 73 79 73 74 65 6d 20 |perating| system |
|000016b0| 63 6f 6d 6d 61 6e 64 22 | 20 8b 20 f1 8a 31 30 2c |command"| . ..10,|
|000016c0| 32 32 29 22 37 2e 2e 2e | 2e 50 65 72 66 6f 72 6d |22)"7...|.Perform|
|000016d0| 20 6f 70 65 72 61 74 69 | 6e 67 20 73 79 73 74 65 | operati|ng syste|
|000016e0| 6d 20 63 6f 6d 6d 61 6e | 64 22 0d 07 4e 1f f1 8a |m comman|d"..N...|
|000016f0| 31 30 2c 32 34 29 22 38 | 2e 2e 2e 2e 51 75 69 74 |10,24)"8|....Quit|
|00001700| 20 70 72 6f 67 72 61 6d | 22 0d 07 58 23 f1 8a 32 | program|"..X#..2|
|00001710| 2c 32 38 29 22 57 68 69 | 63 68 20 64 6f 20 79 6f |,28)"Whi|ch do yo|
|00001720| 75 20 77 61 6e 74 3f 20 | 5b 20 5d 22 0d 07 62 0a |u want? |[ ]"..b.|
|00001730| f2 74 69 74 6c 65 0d 07 | 6c 12 f2 73 68 6f 77 5f |.title..|l..show_|
|00001740| 74 69 6d 65 28 33 30 29 | 0d 07 76 05 f5 0d 07 80 |time(30)|..v.....|
|00001750| 0a 78 3d a6 28 30 29 0d | 07 8a 1e e7 20 78 3c 3e |.x=.(0).|.... x<>|
|00001760| 2d 31 20 4b 45 59 24 3d | bd 78 20 8b 20 4b 45 59 |-1 KEY$=|.x . KEY|
|00001770| 24 3d 22 20 22 0d 07 94 | 21 e7 20 91 3e 31 30 30 |$=" "...|!. .>100|
|00001780| 30 20 8c 20 d1 3d 30 3a | f2 73 68 6f 77 5f 74 69 |0 . .=0:|.show_ti|
|00001790| 6d 65 28 33 30 29 0d 07 | 9e 0e f1 20 8a 32 32 2c |me(30)..|... .22,|
|000017a0| 32 38 29 3b 0d 07 a8 17 | fd 20 a7 22 31 32 33 34 |28);....|. ."1234|
|000017b0| 35 36 37 38 22 2c 4b 45 | 59 24 29 0d 07 b2 26 e7 |5678",KE|Y$)...&.|
|000017c0| 20 4b 45 59 24 3d 22 31 | 22 20 80 20 66 75 6e 63 | KEY$="1|" . func|
|000017d0| 74 69 6f 6e 25 3e 30 20 | f2 70 6c 6f 74 5f 6f 70 |tion%>0 |.plot_op|
|000017e0| 73 0d 07 bc 1a e7 20 4b | 45 59 24 3d 22 32 22 20 |s..... K|EY$="2" |
|000017f0| f2 65 64 69 74 5f 6c 69 | 6e 65 73 0d 07 c6 1c e7 |.edit_li|nes.....|
|00001800| 20 4b 45 59 24 3d 22 33 | 22 20 f2 64 61 74 61 62 | KEY$="3|" .datab|
|00001810| 61 73 65 5f 6f 70 73 0d | 07 d0 1a e7 20 4b 45 59 |ase_ops.|.... KEY|
|00001820| 24 3d 22 34 22 20 f2 63 | 61 6c 63 75 6c 61 74 6f |$="4" .c|alculato|
|00001830| 72 0d 07 da 19 e7 20 4b | 45 59 24 3d 22 35 22 20 |r..... K|EY$="5" |
|00001840| f2 6d 61 74 68 73 5f 6f | 70 73 0d 07 e4 1e e7 20 |.maths_o|ps..... |
|00001850| 4b 45 59 24 3d 22 37 22 | 20 80 20 6f 73 5f 6f 6b |KEY$="7"| . os_ok|
|00001860| 25 20 f2 6f 73 63 6c 69 | 0d 07 ee 29 e7 20 4b 45 |% .oscli|...). KE|
|00001870| 59 24 3d 22 36 22 20 80 | 20 63 6f 6e 66 69 67 75 |Y$="6" .| configu|
|00001880| 72 65 5f 6f 6b 25 20 f2 | 63 6f 6e 66 69 67 75 72 |re_ok% .|configur|
|00001890| 65 0d 07 f8 16 e7 20 4b | 45 59 24 3d 22 38 22 20 |e..... K|EY$="8" |
|000018a0| 71 75 69 74 25 3d b9 0d | 08 02 05 e1 0d 08 0c 05 |quit%=..|........|
|000018b0| 3a 0d 08 16 0e dd f2 70 | 6c 6f 74 5f 6f 70 73 0d |:......p|lot_ops.|
|000018c0| 08 20 0c ea 20 4b 45 59 | 24 2c 78 0d 08 2a 05 f5 |. .. KEY|$,x..*..|
|000018d0| 0d 08 34 10 db 3a ef 31 | 39 2c 30 2c 34 3b 30 3b |..4..:.1|9,0,4;0;|
|000018e0| 0d 08 3e 35 f1 8a 30 2c | 34 29 a4 63 65 6e 74 72 |..>5..0,|4).centr|
|000018f0| 65 28 22 50 20 4c 20 4f | 20 54 20 54 20 49 20 4e |e("P L O| T T I N|
|00001900| 20 47 20 20 20 20 4f 20 | 50 20 54 20 49 20 4f 20 | G O |P T I O |
|00001910| 4e 20 53 22 29 0d 08 48 | 31 f1 8a 32 2c 36 29 22 |N S")..H|1..2,6)"|
|00001920| 50 6c 65 61 73 65 20 73 | 65 6c 65 63 74 20 6f 70 |Please s|elect op|
|00001930| 74 69 6f 6e 20 77 69 74 | 68 20 6e 75 6d 62 65 72 |tion wit|h number|
|00001940| 20 6b 65 79 3a 22 0d 08 | 52 2d f1 8a 31 30 2c 38 | key:"..|R-..10,8|
|00001950| 29 22 31 2e 2e 2e 2e 50 | 6c 6f 74 20 61 6c 6c 20 |)"1....P|lot all |
|00001960| 6c 69 6e 65 73 20 6f 6e | 20 73 61 6d 65 20 61 78 |lines on| same ax|
|00001970| 65 73 22 0d 08 5c 22 f1 | 8a 31 30 2c 39 29 22 32 |es"..\".|.10,9)"2|
|00001980| 2e 2e 2e 2e 50 6c 6f 74 | 20 73 69 6e 67 6c 65 20 |....Plot| single |
|00001990| 6c 69 6e 65 22 0d 08 66 | 32 f1 8a 31 30 2c 31 30 |line"..f|2..10,10|
|000019a0| 29 22 33 2e 2e 2e 2e 50 | 6c 6f 74 20 73 69 6e 67 |)"3....P|lot sing|
|000019b0| 6c 65 20 6c 69 6e 65 20 | 77 69 74 68 20 76 61 72 |le line |with var|
|000019c0| 69 61 62 6c 65 73 22 0d | 08 70 3c f1 8a 31 30 2c |iables".|.p<..10,|
|000019d0| 31 31 29 22 34 2e 2e 2e | 2e 50 6c 6f 74 20 73 65 |11)"4...|.Plot se|
|000019e0| 76 65 72 61 6c 20 6c 69 | 6e 65 73 20 6f 6e 20 73 |veral li|nes on s|
|000019f0| 61 6d 65 20 61 78 65 73 | 20 28 6e 6f 74 20 61 6c |ame axes| (not al|
|00001a00| 6c 29 22 0d 08 7a 26 f1 | 8a 31 30 2c 31 32 29 22 |l)"..z&.|.10,12)"|
|00001a10| 52 2e 2e 2e 2e 52 65 74 | 75 72 6e 20 74 6f 20 6d |R....Ret|urn to m|
|00001a20| 61 69 6e 20 6d 65 6e 75 | 22 0d 08 84 23 f1 8a 32 |ain menu|"...#..2|
|00001a30| 2c 31 35 29 22 57 68 69 | 63 68 20 64 6f 20 79 6f |,15)"Whi|ch do yo|
|00001a40| 75 20 77 61 6e 74 3f 20 | 5b 20 5d 22 0d 08 8e 16 |u want? |[ ]"....|
|00001a50| f2 73 68 6f 77 5f 66 6f | 72 6d 75 6c 61 73 28 31 |.show_fo|rmulas(1|
|00001a60| 36 29 0d 08 98 0a f2 74 | 69 74 6c 65 0d 08 a2 12 |6).....t|itle....|
|00001a70| f2 73 68 6f 77 5f 74 69 | 6d 65 28 33 30 29 0d 08 |.show_ti|me(30)..|
|00001a80| ac 05 f5 0d 08 b6 0a 78 | 3d a6 28 30 29 0d 08 c0 |.......x|=.(0)...|
|00001a90| 1e e7 20 78 3c 3e 2d 31 | 20 4b 45 59 24 3d bd 78 |.. x<>-1| KEY$=.x|
|00001aa0| 20 8b 20 4b 45 59 24 3d | 22 20 22 0d 08 ca 21 e7 | . KEY$=|" "...!.|
|00001ab0| 20 91 3e 31 30 30 30 20 | 8c 20 d1 3d 30 3a f2 73 | .>1000 |. .=0:.s|
|00001ac0| 68 6f 77 5f 74 69 6d 65 | 28 33 30 29 0d 08 d4 0e |how_time|(30)....|
|00001ad0| f1 20 8a 32 32 2c 31 35 | 29 3b 0d 08 de 13 fd 20 |. .22,15|);..... |
|00001ae0| a7 22 31 32 33 52 22 2c | 4b 45 59 24 29 0d 08 e8 |."123R",|KEY$)...|
|00001af0| 17 e7 20 4b 45 59 24 3d | 22 31 22 20 f2 70 6c 6f |.. KEY$=|"1" .plo|
|00001b00| 74 61 6c 6c 0d 08 f2 1b | e7 20 4b 45 59 24 3d 22 |tall....|. KEY$="|
|00001b10| 33 22 20 f2 69 6e 63 5f | 70 6c 6f 74 28 31 29 0d |3" .inc_|plot(1).|
|00001b20| 08 fc 0e fd 20 4b 45 59 | 24 3d 22 52 22 0d 09 06 |.... KEY|$="R"...|
|00001b30| 05 e1 0d 09 10 05 3a 0d | 09 1a 10 dd f2 65 64 69 |......:.|.....edi|
|00001b40| 74 5f 6c 69 6e 65 73 0d | 09 24 1b ea 20 68 69 67 |t_lines.|.$.. hig|
|00001b50| 68 25 2c 6f 6c 64 68 69 | 67 68 25 2c 4b 45 59 24 |h%,oldhi|gh%,KEY$|
|00001b60| 2c 78 0d 09 2e 16 68 69 | 67 68 25 3d 31 3a 6f 6c |,x....hi|gh%=1:ol|
|00001b70| 64 68 69 67 68 25 3d 30 | 0d 09 38 05 f5 0d 09 42 |dhigh%=0|..8....B|
|00001b80| 10 db 3a ef 31 39 2c 30 | 2c 34 3b 30 3b 0d 09 4c |..:.19,0|,4;0;..L|
|00001b90| 38 f1 8a 30 2c 34 29 a4 | 63 65 6e 74 72 65 28 22 |8..0,4).|centre("|
|00001ba0| 45 20 44 20 49 20 54 20 | 20 20 20 4c 20 49 20 4e |E D I T | L I N|
|00001bb0| 20 45 20 20 20 20 44 20 | 45 20 54 20 41 20 49 20 | E D |E T A I |
|00001bc0| 4c 20 53 22 29 0d 09 56 | 4e f1 8a 32 2c 36 29 22 |L S")..V|N..2,6)"|
|00001bd0| 50 6c 65 61 73 65 20 73 | 65 6c 65 63 74 20 6f 70 |Please s|elect op|
|00001be0| 74 69 6f 6e 20 77 69 74 | 68 20 6e 75 6d 62 65 72 |tion wit|h number|
|00001bf0| 20 6b 65 79 20 28 43 75 | 72 73 6f 72 20 6b 65 79 | key (Cu|rsor key|
|00001c00| 73 20 74 6f 20 73 65 6c | 65 63 74 20 6c 69 6e 65 |s to sel|ect line|
|00001c10| 29 3a 22 0d 09 60 23 f1 | 8a 35 2c 37 29 22 31 2e |):"..`#.|.5,7)"1.|
|00001c20| 2e 2e 2e 41 64 64 20 61 | 20 6c 69 6e 65 20 74 6f |...Add a| line to|
|00001c30| 20 6c 69 73 74 22 0d 09 | 6a 71 e7 20 66 75 6e 63 | list"..|jq. func|
|00001c40| 74 69 6f 6e 25 3c 68 69 | 67 68 25 20 f1 8a 33 2c |tion%<hi|gh% ..3,|
|00001c50| 38 29 22 2a 20 32 2e 2e | 2e 2e 44 65 6c 65 74 65 |8)"* 2..|..Delete|
|00001c60| 20 73 65 6c 65 63 74 65 | 64 20 6c 69 6e 65 20 66 | selecte|d line f|
|00001c70| 72 6f 6d 20 6c 69 73 74 | 22 20 8b 20 f1 8a 35 2c |rom list|" . ..5,|
|00001c80| 38 29 22 32 2e 2e 2e 2e | 44 65 6c 65 74 65 20 73 |8)"2....|Delete s|
|00001c90| 65 6c 65 63 74 65 64 20 | 6c 69 6e 65 20 66 72 6f |elected |line fro|
|00001ca0| 6d 20 6c 69 73 74 22 0d | 09 74 73 e7 20 66 75 6e |m list".|.ts. fun|
|00001cb0| 63 74 69 6f 6e 25 3c 68 | 69 67 68 25 20 f1 8a 33 |ction%<h|igh% ..3|
|00001cc0| 2c 39 29 22 2a 20 33 2e | 2e 2e 2e 43 68 61 6e 67 |,9)"* 3.|...Chang|
|00001cd0| 65 20 64 65 74 61 69 6c | 73 20 6f 66 20 73 65 6c |e detail|s of sel|
|00001ce0| 65 63 74 65 64 20 6c 69 | 6e 65 22 20 8b 20 f1 8a |ected li|ne" . ..|
|00001cf0| 35 2c 39 29 22 33 2e 2e | 2e 2e 43 68 61 6e 67 65 |5,9)"3..|..Change|
|00001d00| 20 64 65 74 61 69 6c 73 | 20 6f 66 20 73 65 6c 65 | details| of sele|
|00001d10| 63 74 65 64 20 6c 69 6e | 65 22 0d 09 7e 32 f1 8a |cted lin|e"..~2..|
|00001d20| 35 2c 31 30 29 22 34 2e | 2e 2e 2e 43 68 61 6e 67 |5,10)"4.|...Chang|
|00001d30| 65 20 76 61 72 69 61 62 | 6c 65 73 20 28 41 20 42 |e variab|les (A B|
|00001d40| 20 43 20 4d 20 4e 20 50 | 20 51 29 22 0d 09 88 93 | C M N P| Q)"....|
|00001d50| e7 20 66 75 6e 63 74 69 | 6f 6e 25 3c 68 69 67 68 |. functi|on%<high|
|00001d60| 25 20 f1 8a 33 2c 31 31 | 29 22 2a 20 35 2e 2e 2e |% ..3,11|)"* 5...|
|00001d70| 2e 46 69 6e 64 20 6d 61 | 78 20 61 6e 64 20 6d 69 |.Find ma|x and mi|
|00001d80| 6e 20 59 20 76 61 6c 75 | 65 73 20 6f 66 20 73 65 |n Y valu|es of se|
|00001d90| 6c 65 63 74 65 64 20 66 | 75 6e 63 74 69 6f 6e 22 |lected f|unction"|
|00001da0| 20 8b 20 f1 8a 35 2c 31 | 31 29 22 35 2e 2e 2e 2e | . ..5,1|1)"5....|
|00001db0| 46 69 6e 64 20 6d 61 78 | 20 61 6e 64 20 6d 69 6e |Find max| and min|
|00001dc0| 20 59 20 76 61 6c 75 65 | 73 20 6f 66 20 73 65 6c | Y value|s of sel|
|00001dd0| 65 63 74 65 64 20 66 75 | 6e 63 74 69 6f 6e 22 0d |ected fu|nction".|
|00001de0| 09 92 3e f1 8a 35 2c 31 | 32 29 22 36 2e 2e 2e 2e |..>..5,1|2)"6....|
|00001df0| 44 65 67 72 65 65 73 2f | 52 61 64 69 61 6e 73 20 |Degrees/|Radians |
|00001e00| 20 28 22 3b a4 72 61 64 | 69 61 6e 73 5f 6f 6e 5f | (";.rad|ians_on_|
|00001e10| 6f 66 66 28 72 61 64 25 | 29 3b 22 29 22 0d 09 9c |off(rad%|);")"...|
|00001e20| 25 f1 8a 35 2c 31 33 29 | 22 52 2e 2e 2e 2e 52 65 |%..5,13)|"R....Re|
|00001e30| 74 75 72 6e 20 74 6f 20 | 6d 61 69 6e 20 6d 65 6e |turn to |main men|
|00001e40| 75 22 0d 09 a6 23 f1 8a | 32 2c 31 35 29 22 57 68 |u"...#..|2,15)"Wh|
|00001e50| 69 63 68 20 64 6f 20 79 | 6f 75 20 77 61 6e 74 3f |ich do y|ou want?|
|00001e60| 20 5b 20 5d 22 0d 09 b0 | 16 f2 73 68 6f 77 5f 66 | [ ]"...|..show_f|
|00001e70| 6f 72 6d 75 6c 61 73 28 | 31 36 29 0d 09 ba 0a f2 |ormulas(|16).....|
|00001e80| 74 69 74 6c 65 0d 09 c4 | 12 f2 73 68 6f 77 5f 74 |title...|..show_t|
|00001e90| 69 6d 65 28 33 30 29 0d | 09 ce 1b f2 68 69 67 68 |ime(30).|....high|
|00001ea0| 5f 66 6f 72 6d 75 6c 61 | 28 31 36 2c 68 69 67 68 |_formula|(16,high|
|00001eb0| 25 29 0d 09 d8 12 6f 6c | 64 68 69 67 68 25 3d 68 |%)....ol|dhigh%=h|
|00001ec0| 69 67 68 25 0d 09 e2 05 | f5 0d 09 ec 0a 78 3d a6 |igh%....|.....x=.|
|00001ed0| 28 30 29 0d 09 f6 37 e7 | 20 a6 28 2d 35 38 29 20 |(0)...7.| .(-58) |
|00001ee0| 68 69 67 68 25 3d 68 69 | 67 68 25 2d 31 3a f2 77 |high%=hi|gh%-1:.w|
|00001ef0| 61 69 74 28 31 30 29 3a | e7 20 68 69 67 68 25 3d |ait(10):|. high%=|
|00001f00| 30 20 68 69 67 68 25 3d | 31 30 0d 0a 00 37 e7 20 |0 high%=|10...7. |
|00001f10| a6 28 2d 34 32 29 20 68 | 69 67 68 25 3d 68 69 67 |.(-42) h|igh%=hig|
|00001f20| 68 25 2b 31 3a f2 77 61 | 69 74 28 31 30 29 3a e7 |h%+1:.wa|it(10):.|
|00001f30| 20 68 69 67 68 25 3d 31 | 31 20 68 69 67 68 25 3d | high%=1|1 high%=|
|00001f40| 31 0d 0a 0a 1e e7 20 78 | 3c 3e 2d 31 20 4b 45 59 |1..... x|<>-1 KEY|
|00001f50| 24 3d bd 78 20 8b 20 4b | 45 59 24 3d 22 20 22 0d |$=.x . K|EY$=" ".|
|00001f60| 0a 14 21 e7 20 91 3e 31 | 30 30 30 20 8c 20 d1 3d |..!. .>1|000 . .=|
|00001f70| 30 3a f2 73 68 6f 77 5f | 74 69 6d 65 28 33 30 29 |0:.show_|time(30)|
|00001f80| 0d 0a 1e 0e f1 20 8a 32 | 32 2c 31 35 29 3b 0d 0a |..... .2|2,15);..|
|00001f90| 28 28 fd 20 a7 22 31 32 | 33 34 35 36 52 22 2c 4b |((. ."12|3456R",K|
|00001fa0| 45 59 24 29 20 84 20 68 | 69 67 68 25 3c 3e 6f 6c |EY$) . h|igh%<>ol|
|00001fb0| 64 68 69 67 68 25 0d 0a | 32 1f e7 20 4b 45 59 24 |dhigh%..|2.. KEY$|
|00001fc0| 3d 22 31 22 20 f2 67 65 | 74 5f 6e 65 77 5f 66 6f |="1" .ge|t_new_fo|
|00001fd0| 72 6d 75 6c 61 0d 0a 3c | 30 e7 20 4b 45 59 24 3d |rmula..<|0. KEY$=|
|00001fe0| 22 32 22 20 80 20 66 75 | 6e 63 74 69 6f 6e 25 3e |"2" . fu|nction%>|
|00001ff0| 3d 68 69 67 68 25 20 f2 | 64 65 6c 65 74 65 28 68 |=high% .|delete(h|
|00002000| 69 67 68 25 29 0d 0a 46 | 3b e7 20 4b 45 59 24 3d |igh%)..F|;. KEY$=|
|00002010| 22 33 22 20 80 20 66 75 | 6e 63 74 69 6f 6e 25 3e |"3" . fu|nction%>|
|00002020| 3d 68 69 67 68 25 20 f2 | 65 64 69 74 5f 6c 69 6e |=high% .|edit_lin|
|00002030| 65 5f 64 65 74 61 69 6c | 73 28 68 69 67 68 25 29 |e_detail|s(high%)|
|00002040| 0d 0a 50 65 e7 20 4b 45 | 59 24 3d 22 34 22 20 db |..Pe. KE|Y$="4" .|
|00002050| 3a f1 22 57 68 69 63 68 | 20 76 61 72 69 61 62 6c |:."Which| variabl|
|00002060| 65 3f 20 28 41 2d 57 20 | 6f 72 20 5a 29 20 22 3b |e? (A-W |or Z) ";|
|00002070| 3a 76 61 72 24 3d be 3a | f1 20 76 61 72 24 3a e8 |:var$=.:|. var$:.|
|00002080| 22 56 61 6c 75 65 3d 20 | 22 3b 76 61 6c 3a f2 73 |"Value= |";val:.s|
|00002090| 65 74 5f 76 61 72 69 61 | 62 6c 65 28 76 61 72 24 |et_varia|ble(var$|
|000020a0| 2c 76 61 6c 29 0d 0a 5a | 35 e7 20 4b 45 59 24 3d |,val)..Z|5. KEY$=|
|000020b0| 22 35 22 20 80 20 66 75 | 6e 63 74 69 6f 6e 25 3e |"5" . fu|nction%>|
|000020c0| 3d 68 69 67 68 25 20 f2 | 67 65 74 5f 79 5f 72 61 |=high% .|get_y_ra|
|000020d0| 6e 67 65 28 68 69 67 68 | 25 29 0d 0a 64 21 e7 20 |nge(high|%)..d!. |
|000020e0| 4b 45 59 24 3d 22 36 22 | 20 72 61 64 25 3d a4 74 |KEY$="6"| rad%=.t|
|000020f0| 6f 67 67 6c 65 28 72 61 | 64 25 29 0d 0a 6e 0e fd |oggle(ra|d%)..n..|
|00002100| 20 4b 45 59 24 3d 22 52 | 22 0d 0a 78 05 e1 0d 0a | KEY$="R|"..x....|
|00002110| 82 05 3a 0d 0a 8c 1e dd | f2 65 64 69 74 5f 6c 69 |..:.....|.edit_li|
|00002120| 6e 65 5f 64 65 74 61 69 | 6c 73 28 6c 69 6e 65 25 |ne_detai|ls(line%|
|00002130| 29 0d 0a 96 0c ea 20 4b | 45 59 24 2c 78 0d 0a a0 |)..... K|EY$,x...|
|00002140| 05 f5 0d 0a aa 10 db 3a | ef 31 39 2c 30 2c 34 3b |.......:|.19,0,4;|
|00002150| 30 3b 0d 0a b4 38 f1 8a | 30 2c 34 29 a4 63 65 6e |0;...8..|0,4).cen|
|00002160| 74 72 65 28 22 45 20 44 | 20 49 20 54 20 20 20 20 |tre("E D| I T |
|00002170| 4c 20 49 20 4e 20 45 20 | 20 20 20 44 20 45 20 54 |L I N E | D E T|
|00002180| 20 41 20 49 20 4c 20 53 | 22 29 0d 0a be 31 f1 8a | A I L S|")...1..|
|00002190| 32 2c 36 29 22 50 6c 65 | 61 73 65 20 73 65 6c 65 |2,6)"Ple|ase sele|
|000021a0| 63 74 20 6f 70 74 69 6f | 6e 20 77 69 74 68 20 6e |ct optio|n with n|
|000021b0| 75 6d 62 65 72 20 6b 65 | 79 3a 22 0d 0a c8 20 f1 |umber ke|y:"... .|
|000021c0| 8a 31 30 2c 38 29 22 31 | 2e 2e 2e 2e 43 68 61 6e |.10,8)"1|....Chan|
|000021d0| 67 65 20 66 6f 72 6d 75 | 6c 61 22 0d 0a d2 29 f1 |ge formu|la"...).|
|000021e0| 8a 31 30 2c 31 30 29 22 | 32 2e 2e 2e 2e 43 68 61 |.10,10)"|2....Cha|
|000021f0| 6e 67 65 20 6d 69 6e 69 | 6d 75 6d 20 78 20 76 61 |nge mini|mum x va|
|00002200| 6c 75 65 22 0d 0a dc 29 | f1 8a 31 30 2c 31 32 29 |lue"...)|..10,12)|
|00002210| 22 33 2e 2e 2e 2e 43 68 | 61 6e 67 65 20 6d 61 78 |"3....Ch|ange max|
|00002220| 69 6d 75 6d 20 78 20 76 | 61 6c 75 65 22 0d 0a e6 |imum x v|alue"...|
|00002230| 29 f1 8a 31 30 2c 31 34 | 29 22 34 2e 2e 2e 2e 43 |)..10,14|)"4....C|
|00002240| 68 61 6e 67 65 20 6d 69 | 6e 69 6d 75 6d 20 79 20 |hange mi|nimum y |
|00002250| 76 61 6c 75 65 22 0d 0a | f0 29 f1 8a 31 30 2c 31 |value"..|.)..10,1|
|00002260| 36 29 22 35 2e 2e 2e 2e | 43 68 61 6e 67 65 20 6d |6)"5....|Change m|
|00002270| 61 78 69 6d 75 6d 20 79 | 20 76 61 6c 75 65 22 0d |aximum y| value".|
|00002280| 0a fa 2a f1 8a 31 30 2c | 31 38 29 22 36 2e 2e 2e |..*..10,|18)"6...|
|00002290| 2e 41 75 74 6f 20 72 61 | 6e 67 65 20 66 6f 72 20 |.Auto ra|nge for |
|000022a0| 79 20 76 61 6c 75 65 73 | 22 0d 0b 04 2c f1 8a 31 |y values|"...,..1|
|000022b0| 30 2c 32 30 29 22 37 2e | 2e 2e 2e 53 74 6f 72 65 |0,20)"7.|...Store|
|000022c0| 20 66 6f 72 6d 75 6c 61 | 20 69 6e 20 64 61 74 61 | formula| in data|
|000022d0| 62 61 73 65 22 0d 0b 0e | 2a f1 8a 31 30 2c 32 32 |base"...|*..10,22|
|000022e0| 29 22 52 2e 2e 2e 2e 52 | 65 74 75 72 6e 20 74 6f |)"R....R|eturn to|
|000022f0| 20 70 72 65 76 69 6f 75 | 73 20 6d 65 6e 75 22 0d | previou|s menu".|
|00002300| 0b 18 23 f1 8a 32 2c 32 | 34 29 22 57 68 69 63 68 |..#..2,2|4)"Which|
|00002310| 20 64 6f 20 79 6f 75 20 | 77 61 6e 74 3f 20 5b 20 | do you |want? [ |
|00002320| 5d 22 0d 0b 22 47 f1 8a | 31 2c 32 36 29 22 6e 22 |]".."G..|1,26)"n"|
|00002330| 8a 34 29 22 46 75 6e 63 | 74 69 6f 6e 22 8a 33 39 |.4)"Func|tion".39|
|00002340| 29 22 6d 69 6e 20 78 22 | 8a 34 39 29 22 6d 61 78 |)"min x"|.49)"max|
|00002350| 20 78 22 8a 35 39 29 22 | 6d 69 6e 20 79 22 8a 36 | x".59)"|min y".6|
|00002360| 39 29 22 6d 61 78 20 79 | 22 0d 0b 2c 7b f1 8a 31 |9)"max y|"..,{..1|
|00002370| 2c 32 37 29 22 22 3b 6c | 69 6e 65 25 3b 8a 35 2c |,27)"";l|ine%;.5,|
|00002380| 32 37 29 22 79 3d 22 3b | 66 75 6e 63 24 28 6c 69 |27)"y=";|func$(li|
|00002390| 6e 65 25 29 3b 8a 34 30 | 2c 32 37 29 3b 78 6d 69 |ne%);.40|,27);xmi|
|000023a0| 6e 28 6c 69 6e 65 25 29 | 3b 8a 35 30 2c 32 37 29 |n(line%)|;.50,27)|
|000023b0| 3b 78 6d 61 78 28 6c 69 | 6e 65 25 29 3b 8a 36 30 |;xmax(li|ne%);.60|
|000023c0| 2c 32 37 29 3b 79 6d 69 | 6e 28 6c 69 6e 65 25 29 |,27);ymi|n(line%)|
|000023d0| 3b 8a 37 30 2c 32 37 29 | 3b 79 6d 61 78 28 6c 69 |;.70,27)|;ymax(li|
|000023e0| 6e 65 25 29 0d 0b 36 0a | f2 74 69 74 6c 65 0d 0b |ne%)..6.|.title..|
|000023f0| 40 12 f2 73 68 6f 77 5f | 74 69 6d 65 28 33 30 29 |@..show_|time(30)|
|00002400| 0d 0b 4a 05 f5 0d 0b 54 | 0a 78 3d a6 28 30 29 0d |..J....T|.x=.(0).|
|00002410| 0b 5e 1e e7 20 78 3c 3e | 2d 31 20 4b 45 59 24 3d |.^.. x<>|-1 KEY$=|
|00002420| bd 78 20 8b 20 4b 45 59 | 24 3d 22 20 22 0d 0b 68 |.x . KEY|$=" "..h|
|00002430| 0e f1 20 8a 32 32 2c 32 | 34 29 3b 0d 0b 72 18 fd |.. .22,2|4);..r..|
|00002440| 20 a7 22 31 32 33 34 35 | 37 36 37 52 22 2c 4b 45 | ."12345|767R",KE|
|00002450| 59 24 29 0d 0b 7c 80 e7 | 20 4b 45 59 24 3d 22 31 |Y$)..|..| KEY$="1|
|00002460| 22 20 e8 8a 31 2c 32 38 | 29 22 46 75 6e 63 74 69 |" ..1,28|)"Functi|
|00002470| 6f 6e 3a 20 79 3d 22 66 | 75 6e 63 24 3a 66 75 6e |on: y="f|unc$:fun|
|00002480| 63 24 3d a4 63 61 73 65 | 28 66 75 6e 63 24 29 3a |c$=.case|(func$):|
|00002490| 62 61 73 69 63 76 24 28 | 6c 69 6e 65 25 29 3d a4 |basicv$(|line%)=.|
|000024a0| 62 61 73 69 63 5f 76 65 | 72 73 69 6f 6e 28 66 75 |basic_ve|rsion(fu|
|000024b0| 6e 63 24 2c b9 29 3a 66 | 75 6e 63 24 28 6c 69 6e |nc$,.):f|unc$(lin|
|000024c0| 65 25 29 3d a4 61 6c 67 | 65 62 72 61 28 66 75 6e |e%)=.alg|ebra(fun|
|000024d0| 63 24 29 0d 0b 86 2e e7 | 20 4b 45 59 24 3d 22 32 |c$).....| KEY$="2|
|000024e0| 22 20 e8 8a 31 2c 32 38 | 29 22 4d 69 6e 69 6d 75 |" ..1,28|)"Minimu|
|000024f0| 6d 20 78 3a 20 22 78 6d | 69 6e 28 6c 69 6e 65 25 |m x: "xm|in(line%|
|00002500| 29 0d 0b 90 2e e7 20 4b | 45 59 24 3d 22 33 22 20 |)..... K|EY$="3" |
|00002510| e8 8a 31 2c 32 38 29 22 | 4d 61 78 69 6d 75 6d 20 |..1,28)"|Maximum |
|00002520| 78 3a 20 22 78 6d 61 78 | 28 6c 69 6e 65 25 29 0d |x: "xmax|(line%).|
|00002530| 0b 9a 2e e7 20 4b 45 59 | 24 3d 22 34 22 20 e8 8a |.... KEY|$="4" ..|
|00002540| 31 2c 32 38 29 22 4d 69 | 6e 69 6d 75 6d 20 79 3a |1,28)"Mi|nimum y:|
|00002550| 20 22 79 6d 69 6e 28 6c | 69 6e 65 25 29 0d 0b a4 | "ymin(l|ine%)...|
|00002560| 2e e7 20 4b 45 59 24 3d | 22 35 22 20 e8 8a 31 2c |.. KEY$=|"5" ..1,|
|00002570| 32 38 29 22 4d 61 78 69 | 6d 75 6d 20 79 3a 20 22 |28)"Maxi|mum y: "|
|00002580| 79 6d 61 78 28 6c 69 6e | 65 25 29 0d 0b ae 22 e7 |ymax(lin|e%)...".|
|00002590| 20 4b 45 59 24 3d 22 36 | 22 20 f2 67 65 74 5f 79 | KEY$="6|" .get_y|
|000025a0| 5f 72 61 6e 67 65 28 6c | 69 6e 65 25 29 0d 0b b8 |_range(l|ine%)...|
|000025b0| 1c e7 20 4b 45 59 24 3d | 22 37 22 20 f2 73 74 6f |.. KEY$=|"7" .sto|
|000025c0| 72 65 28 6c 69 6e 65 25 | 29 0d 0b c2 0e fd 20 4b |re(line%|)..... K|
|000025d0| 45 59 24 3d 22 52 22 0d | 0b cc 05 e1 0d 0b d6 05 |EY$="R".|........|
|000025e0| 3a 0d 0b e0 0f dd f2 6d | 61 74 68 73 5f 6f 70 73 |:......m|aths_ops|
|000025f0| 0d 0b ea 0c ea 20 4b 45 | 59 24 2c 78 0d 0b f4 05 |..... KE|Y$,x....|
|00002600| f5 0d 0b fe 10 db 3a ef | 31 39 2c 30 2c 34 3b 30 |......:.|19,0,4;0|
|00002610| 3b 0d 0c 08 45 f1 8a 30 | 2c 34 29 a4 63 65 6e 74 |;...E..0|,4).cent|
|00002620| 72 65 28 22 4d 20 41 20 | 54 20 48 20 45 20 52 20 |re("M A |T H E R |
|00002630| 4d 20 41 20 54 20 49 20 | 43 20 41 20 4c 20 20 20 |M A T I |C A L |
|00002640| 20 4f 20 50 20 45 20 52 | 20 41 20 54 20 49 20 4f | O P E R| A T I O|
|00002650| 20 4e 20 53 22 29 0d 0c | 12 31 f1 8a 32 2c 36 29 | N S")..|.1..2,6)|
|00002660| 22 50 6c 65 61 73 65 20 | 73 65 6c 65 63 74 20 6f |"Please |select o|
|00002670| 70 74 69 6f 6e 20 77 69 | 74 68 20 6e 75 6d 62 65 |ption wi|th numbe|
|00002680| 72 20 6b 65 79 3a 22 0d | 0c 1c 22 f1 8a 31 30 2c |r key:".|.."..10,|
|00002690| 39 29 22 31 2e 2e 2e 2e | 51 75 61 64 72 61 74 69 |9)"1....|Quadrati|
|000026a0| 63 20 73 6f 6c 76 65 72 | 22 0d 0c 26 22 f1 8a 31 |c solver|"..&"..1|
|000026b0| 30 2c 31 31 29 22 32 2e | 2e 2e 2e 44 69 66 66 65 |0,11)"2.|...Diffe|
|000026c0| 72 65 6e 74 69 61 74 69 | 6f 6e 22 0d 0c 30 1e f1 |rentiati|on"..0..|
|000026d0| 8a 31 30 2c 31 33 29 22 | 33 2e 2e 2e 2e 49 6e 74 |.10,13)"|3....Int|
|000026e0| 65 67 72 61 74 69 6f 6e | 22 0d 0c 3a 19 f1 8a 31 |egration|"..:...1|
|000026f0| 30 2c 31 35 29 22 34 2e | 2e 2e 2e 53 65 72 69 65 |0,15)"4.|...Serie|
|00002700| 73 22 0d 0c 44 26 f1 8a | 31 30 2c 31 37 29 22 52 |s"..D&..|10,17)"R|
|00002710| 2e 2e 2e 2e 52 65 74 75 | 72 6e 20 74 6f 20 6d 61 |....Retu|rn to ma|
|00002720| 69 6e 20 6d 65 6e 75 22 | 0d 0c 4e 23 f1 8a 32 2c |in menu"|..N#..2,|
|00002730| 31 39 29 22 57 68 69 63 | 68 20 64 6f 20 79 6f 75 |19)"Whic|h do you|
|00002740| 20 77 61 6e 74 3f 20 5b | 20 5d 22 0d 0c 58 0a f2 | want? [| ]"..X..|
|00002750| 74 69 74 6c 65 0d 0c 62 | 12 f2 73 68 6f 77 5f 74 |title..b|..show_t|
|00002760| 69 6d 65 28 33 30 29 0d | 0c 6c 05 f5 0d 0c 76 0a |ime(30).|.l....v.|
|00002770| 78 3d a6 28 30 29 0d 0c | 80 1e e7 20 78 3c 3e 2d |x=.(0)..|... x<>-|
|00002780| 31 20 4b 45 59 24 3d bd | 78 20 8b 20 4b 45 59 24 |1 KEY$=.|x . KEY$|
|00002790| 3d 22 20 22 0d 0c 8a 21 | e7 20 91 3e 31 30 30 30 |=" "...!|. .>1000|
|000027a0| 20 8c 20 d1 3d 30 3a f2 | 73 68 6f 77 5f 74 69 6d | . .=0:.|show_tim|
|000027b0| 65 28 33 30 29 0d 0c 94 | 0e f1 20 8a 32 32 2c 31 |e(30)...|.. .22,1|
|000027c0| 39 29 3b 0d 0c 9e 14 fd | 20 a7 22 31 32 33 34 52 |9);.....| ."1234R|
|000027d0| 22 2c 4b 45 59 24 29 0d | 0c a8 1c e7 20 4b 45 59 |",KEY$).|.... KEY|
|000027e0| 24 3d 22 31 22 20 8c 20 | f2 71 75 61 64 72 61 74 |$="1" . |.quadrat|
|000027f0| 69 63 73 0d 0c b2 21 e7 | 20 4b 45 59 24 3d 22 32 |ics...!.| KEY$="2|
|00002800| 22 20 8c 20 f2 64 69 66 | 66 65 72 65 6e 74 69 61 |" . .dif|ferentia|
|00002810| 74 69 6f 6e 0d 0c bc 1d | e7 20 4b 45 59 24 3d 22 |tion....|. KEY$="|
|00002820| 33 22 20 8c 20 f2 69 6e | 74 65 67 72 61 74 69 6f |3" . .in|tegratio|
|00002830| 6e 0d 0c c6 18 e7 20 4b | 45 59 24 3d 22 34 22 20 |n..... K|EY$="4" |
|00002840| 8c 20 f2 73 65 72 69 65 | 73 0d 0c d0 0e fd 20 4b |. .serie|s..... K|
|00002850| 45 59 24 3d 22 52 22 0d | 0c da 05 e1 0d 0c e4 05 |EY$="R".|........|
|00002860| 3a 0d 0c ee 0f dd f2 63 | 6f 6e 66 69 67 75 72 65 |:......c|onfigure|
|00002870| 0d 0c f8 0c ea 20 4b 45 | 59 24 2c 78 0d 0d 02 05 |..... KE|Y$,x....|
|00002880| f5 0d 0d 0c 10 db 3a ef | 31 39 2c 30 2c 34 3b 30 |......:.|19,0,4;0|
|00002890| 3b 0d 0d 16 3b f1 8a 30 | 2c 34 29 a4 63 65 6e 74 |;...;..0|,4).cent|
|000028a0| 72 65 28 22 43 20 4f 20 | 4e 20 46 20 49 20 47 20 |re("C O |N F I G |
|000028b0| 55 20 52 20 41 20 54 20 | 49 20 4f 20 4e 20 20 20 |U R A T |I O N |
|000028c0| 20 20 20 4d 20 45 20 4e | 20 55 22 29 0d 0d 20 31 | M E N| U").. 1|
|000028d0| f1 8a 32 2c 36 29 22 50 | 6c 65 61 73 65 20 73 65 |..2,6)"P|lease se|
|000028e0| 6c 65 63 74 20 6f 70 74 | 69 6f 6e 20 77 69 74 68 |lect opt|ion with|
|000028f0| 20 6e 75 6d 62 65 72 20 | 6b 65 79 3a 22 0d 0d 2a | number |key:"..*|
|00002900| 3a f1 8a 31 30 2c 39 29 | 22 31 2e 2e 2e 2e 52 6f |:..10,9)|"1....Ro|
|00002910| 6f 74 20 64 69 72 65 63 | 74 6f 72 79 22 8a 34 30 |ot direc|tory".40|
|00002920| 29 a4 63 68 6f 70 28 72 | 6f 6f 74 5f 64 69 72 65 |).chop(r|oot_dire|
|00002930| 63 74 6f 72 79 24 29 0d | 0d 34 38 f1 8a 31 30 2c |ctory$).|.48..10,|
|00002940| 31 30 29 22 32 2e 2e 2e | 2e 44 65 66 61 75 6c 74 |10)"2...|.Default|
|00002950| 20 64 61 74 61 62 61 73 | 65 22 8a 34 30 29 64 65 | databas|e".40)de|
|00002960| 66 61 75 6c 74 5f 64 61 | 74 61 62 61 73 65 24 0d |fault_da|tabase$.|
|00002970| 0d 3e 3d f1 8a 31 30 2c | 31 31 29 22 33 2e 2e 2e |.>=..10,|11)"3...|
|00002980| 2e 53 63 72 65 65 6e 20 | 64 75 6d 70 20 70 72 6f |.Screen |dump pro|
|00002990| 67 72 61 6d 22 8a 34 30 | 29 a4 63 68 6f 70 28 73 |gram".40|).chop(s|
|000029a0| 63 72 65 65 6e 5f 70 72 | 6f 67 24 29 0d 0d 48 3d |creen_pr|og$)..H=|
|000029b0| f1 8a 31 30 2c 31 32 29 | 22 34 2e 2e 2e 2e 53 63 |..10,12)|"4....Sc|
|000029c0| 72 65 65 6e 20 64 75 6d | 70 20 63 6f 6d 6d 61 6e |reen dum|p comman|
|000029d0| 64 22 8a 34 30 29 a4 63 | 68 6f 70 28 73 63 72 65 |d".40).c|hop(scre|
|000029e0| 65 6e 5f 64 75 6d 70 24 | 29 0d 0d 52 3f f1 8a 31 |en_dump$|)..R?..1|
|000029f0| 30 2c 31 33 29 22 35 2e | 2e 2e 2e 50 72 69 6e 74 |0,13)"5.|...Print|
|00002a00| 65 72 20 65 6e 61 62 6c | 65 2f 64 69 73 61 62 6c |er enabl|e/disabl|
|00002a10| 65 22 8a 34 30 29 a4 65 | 6e 61 62 6c 65 64 28 70 |e".40).e|nabled(p|
|00002a20| 72 69 6e 74 65 72 25 29 | 0d 0d 5c 2d f1 8a 31 30 |rinter%)|..\-..10|
|00002a30| 2c 31 34 29 22 36 2e 2e | 2e 2e 50 6f 69 6e 74 73 |,14)"6..|..Points|
|00002a40| 20 70 6c 6f 74 74 65 64 | 22 8a 34 30 29 3b 70 6f | plotted|".40);po|
|00002a50| 69 6e 74 73 25 0d 0d 66 | 34 f1 8a 31 30 2c 31 35 |ints%..f|4..10,15|
|00002a60| 29 22 37 2e 2e 2e 2e 4d | 61 78 20 66 75 6e 63 74 |)"7....M|ax funct|
|00002a70| 69 6f 6e 73 20 69 6e 20 | 64 61 74 61 62 61 73 65 |ions in |database|
|00002a80| 22 8a 34 30 29 3b 6d 61 | 78 0d 0d 70 41 f1 8a 31 |".40);ma|x..pA..1|
|00002a90| 30 2c 31 36 29 22 38 2e | 2e 2e 2e 4f 53 20 63 6f |0,16)"8.|...OS co|
|00002aa0| 6d 6d 61 6e 64 73 20 65 | 6e 61 62 6c 65 2f 64 69 |mmands e|nable/di|
|00002ab0| 73 61 62 6c 65 22 8a 34 | 30 29 a4 65 6e 61 62 6c |sable".4|0).enabl|
|00002ac0| 65 64 28 6f 73 5f 6f 6b | 25 29 0d 0d 7a 46 f1 8a |ed(os_ok|%)..zF..|
|00002ad0| 31 30 2c 31 37 29 22 39 | 2e 2e 2e 2e 43 6f 6e 66 |10,17)"9|....Conf|
|00002ae0| 69 67 75 72 65 20 65 6e | 61 62 6c 65 2f 64 69 73 |igure en|able/dis|
|00002af0| 61 62 6c 65 22 8a 34 30 | 29 a4 65 6e 61 62 6c 65 |able".40|).enable|
|00002b00| 64 28 63 6f 6e 66 69 67 | 75 72 65 5f 6f 6b 25 29 |d(config|ure_ok%)|
|00002b10| 0d 0d 84 39 f1 8a 31 30 | 2c 31 38 29 22 30 2e 2e |...9..10|,18)"0..|
|00002b20| 2e 2e 53 65 74 20 63 6f | 6e 66 69 67 75 72 65 20 |..Set co|nfigure |
|00002b30| 70 61 73 73 77 6f 72 64 | 22 8a 34 30 29 63 6f 6e |password|".40)con|
|00002b40| 66 69 67 5f 70 61 73 73 | 24 0d 0d 8e 26 f1 8a 31 |fig_pass|$...&..1|
|00002b50| 30 2c 32 30 29 22 52 2e | 2e 2e 2e 52 65 74 75 72 |0,20)"R.|...Retur|
|00002b60| 6e 20 74 6f 20 6d 61 69 | 6e 20 6d 65 6e 75 22 0d |n to mai|n menu".|
|00002b70| 0d 98 23 f1 8a 32 2c 32 | 33 29 22 57 68 69 63 68 |..#..2,2|3)"Which|
|00002b80| 20 64 6f 20 79 6f 75 20 | 77 61 6e 74 3f 20 5b 20 | do you |want? [ |
|00002b90| 5d 22 0d 0d a2 50 f1 8a | 32 2c 32 36 29 22 52 75 |]"...P..|2,26)"Ru|
|00002ba0| 6e 6e 69 6e 67 20 6f 6e | 3a 20 22 3b 63 6f 6d 70 |nning on|: ";comp|
|00002bb0| 75 74 65 72 24 3b 8a 33 | 38 29 3b 22 54 65 72 6d |uter$;.3|8);"Term|
|00002bc0| 69 6e 61 74 65 20 6f 6e | 20 65 72 72 6f 72 3a 20 |inate on| error: |
|00002bd0| 22 3b a4 65 6e 61 62 6c | 65 64 28 64 65 62 75 67 |";.enabl|ed(debug|
|00002be0| 25 29 0d 0d ac 46 f1 8a | 32 2c 32 37 29 22 46 75 |%)...F..|2,27)"Fu|
|00002bf0| 6e 63 74 69 6f 6e 73 3a | 20 20 22 3b 66 75 6e 63 |nctions:| ";func|
|00002c00| 74 69 6f 6e 25 3b 8a 33 | 38 29 3b 22 53 69 7a 65 |tion%;.3|8);"Size|
|00002c10| 20 6f 66 20 64 61 74 61 | 62 61 73 65 3a 20 20 22 | of data|base: "|
|00002c20| 3b 73 74 6f 72 65 64 25 | 0d 0d b6 0a f2 74 69 74 |;stored%|.....tit|
|00002c30| 6c 65 0d 0d c0 12 f2 73 | 68 6f 77 5f 74 69 6d 65 |le.....s|how_time|
|00002c40| 28 33 30 29 0d 0d ca 05 | f5 0d 0d d4 0a 78 3d a6 |(30)....|.....x=.|
|00002c50| 28 30 29 0d 0d de 1e e7 | 20 78 3c 3e 2d 31 20 4b |(0).....| x<>-1 K|
|00002c60| 45 59 24 3d bd 78 20 8b | 20 4b 45 59 24 3d 22 20 |EY$=.x .| KEY$=" |
|00002c70| 22 0d 0d e8 21 e7 20 91 | 3e 31 30 30 30 20 8c 20 |"...!. .|>1000 . |
|00002c80| d1 3d 30 3a f2 73 68 6f | 77 5f 74 69 6d 65 28 33 |.=0:.sho|w_time(3|
|00002c90| 30 29 0d 0d f2 0e f1 20 | 8a 32 32 2c 32 33 29 3b |0)..... |.22,23);|
|00002ca0| 0d 0d fc 1a fd 20 a7 22 | 31 32 33 34 35 36 37 38 |..... ."|12345678|
|00002cb0| 39 30 52 22 2c 4b 45 59 | 24 29 0d 0e 06 37 e7 20 |90R",KEY|$)...7. |
|00002cc0| 4b 45 59 24 3d 22 31 22 | 20 e8 8a 31 2c 32 38 29 |KEY$="1"| ..1,28)|
|00002cd0| 22 52 6f 6f 74 20 64 69 | 72 65 63 74 6f 72 79 3a |"Root di|rectory:|
|00002ce0| 20 22 72 6f 6f 74 5f 64 | 69 72 65 63 74 6f 72 79 | "root_d|irectory|
|00002cf0| 24 0d 0e 10 3b e7 20 4b | 45 59 24 3d 22 32 22 20 |$...;. K|EY$="2" |
|00002d00| e8 8a 31 2c 32 38 29 22 | 44 65 66 61 75 6c 74 20 |..1,28)"|Default |
|00002d10| 64 61 74 61 62 61 73 65 | 3a 20 22 64 65 66 61 75 |database|: "defau|
|00002d20| 6c 74 5f 64 61 74 61 62 | 61 73 65 24 0d 0e 1a 39 |lt_datab|ase$...9|
|00002d30| e7 20 4b 45 59 24 3d 22 | 33 22 20 e8 8a 31 2c 32 |. KEY$="|3" ..1,2|
|00002d40| 38 29 22 53 63 72 65 65 | 6e 20 64 75 6d 70 20 70 |8)"Scree|n dump p|
|00002d50| 72 6f 67 72 61 6d 3a 20 | 22 73 63 72 65 65 6e 5f |rogram: |"screen_|
|00002d60| 70 72 6f 67 24 0d 0e 24 | 3a e7 20 4b 45 59 24 3d |prog$..$|:. KEY$=|
|00002d70| 22 34 22 20 e8 8a 31 2c | 32 38 29 22 53 63 72 65 |"4" ..1,|28)"Scre|
|00002d80| 65 6e 20 64 75 6d 70 20 | 63 6f 6d 6d 61 6e 64 3a |en dump |command:|
|00002d90| 20 2a 22 73 63 72 65 65 | 6e 5f 64 75 6d 70 24 0d | *"scree|n_dump$.|
|00002da0| 0e 2e 29 e7 20 4b 45 59 | 24 3d 22 35 22 20 70 72 |..). KEY|$="5" pr|
|00002db0| 69 6e 74 65 72 25 3d a4 | 74 6f 67 67 6c 65 28 70 |inter%=.|toggle(p|
|00002dc0| 72 69 6e 74 65 72 25 29 | 0d 0e 38 2f e7 20 4b 45 |rinter%)|..8/. KE|
|00002dd0| 59 24 3d 22 36 22 20 e8 | 8a 31 2c 32 38 29 22 50 |Y$="6" .|.1,28)"P|
|00002de0| 6f 69 6e 74 73 20 70 6c | 6f 74 74 65 64 3a 20 22 |oints pl|otted: "|
|00002df0| 70 6f 69 6e 74 73 25 0d | 0e 42 38 e7 20 4b 45 59 |points%.|.B8. KEY|
|00002e00| 24 3d 22 37 22 20 e8 8a | 31 2c 32 38 29 22 4d 61 |$="7" ..|1,28)"Ma|
|00002e10| 78 69 6d 75 6d 20 6e 75 | 6d 62 65 72 20 6f 66 20 |ximum nu|mber of |
|00002e20| 66 75 6e 63 74 69 6f 6e | 73 3a 20 22 6d 61 78 0d |function|s: "max.|
|00002e30| 0e 4c 25 e7 20 4b 45 59 | 24 3d 22 38 22 20 6f 73 |.L%. KEY|$="8" os|
|00002e40| 5f 6f 6b 25 3d a4 74 6f | 67 67 6c 65 28 6f 73 5f |_ok%=.to|ggle(os_|
|00002e50| 6f 6b 25 29 0d 0e 56 33 | e7 20 4b 45 59 24 3d 22 |ok%)..V3|. KEY$="|
|00002e60| 39 22 20 63 6f 6e 66 69 | 67 75 72 65 5f 6f 6b 25 |9" confi|gure_ok%|
|00002e70| 3d a4 74 6f 67 67 6c 65 | 28 63 6f 6e 66 69 67 75 |=.toggle|(configu|
|00002e80| 72 65 5f 6f 6b 25 29 0d | 0e 60 38 e7 20 4b 45 59 |re_ok%).|.`8. KEY|
|00002e90| 24 3d 22 30 22 20 e8 8a | 31 2c 32 38 29 22 43 6f |$="0" ..|1,28)"Co|
|00002ea0| 6e 66 69 67 75 72 65 20 | 70 61 73 73 77 6f 72 64 |nfigure |password|
|00002eb0| 3a 20 22 63 6f 6e 66 69 | 67 5f 70 61 73 73 24 0d |: "confi|g_pass$.|
|00002ec0| 0e 6a 0e fd 20 4b 45 59 | 24 3d 22 52 22 0d 0e 74 |.j.. KEY|$="R"..t|
|00002ed0| 13 f2 73 61 76 65 5f 63 | 6f 6e 66 69 67 75 72 65 |..save_c|onfigure|
|00002ee0| 0d 0e 7e 05 e1 0d 0e 88 | 05 3a 0d 0e 92 12 dd f2 |..~.....|.:......|
|00002ef0| 64 61 74 61 62 61 73 65 | 5f 6f 70 73 0d 0e 9c 21 |database|_ops...!|
|00002f00| ea 20 4b 45 59 24 2c 78 | 2c 70 61 67 65 25 2c 68 |. KEY$,x|,page%,h|
|00002f10| 69 67 68 25 2c 6f 6c 64 | 68 69 67 68 25 0d 0e a6 |igh%,old|high%...|
|00002f20| 1e 68 69 67 68 25 3d 31 | 3a 6f 6c 64 68 69 67 68 |.high%=1|:oldhigh|
|00002f30| 25 3d 30 3a 70 61 67 65 | 25 3d 30 0d 0e b0 05 f5 |%=0:page|%=0.....|
|00002f40| 0d 0e ba 10 db 3a ef 31 | 39 2c 30 2c 34 3b 30 3b |.....:.1|9,0,4;0;|
|00002f50| 0d 0e c4 36 f1 8a 30 2c | 34 29 a4 63 65 6e 74 72 |...6..0,|4).centr|
|00002f60| 65 28 22 44 20 41 20 54 | 20 41 20 42 20 41 20 53 |e("D A T| A B A S|
|00002f70| 20 45 20 20 20 20 20 4f | 20 50 20 54 20 49 20 4f | E O| P T I O|
|00002f80| 20 4e 20 53 22 29 0d 0e | ce 31 f1 8a 32 2c 36 29 | N S")..|.1..2,6)|
|00002f90| 22 50 6c 65 61 73 65 20 | 73 65 6c 65 63 74 20 6f |"Please |select o|
|00002fa0| 70 74 69 6f 6e 20 77 69 | 74 68 20 6e 75 6d 62 65 |ption wi|th numbe|
|00002fb0| 72 20 6b 65 79 3a 22 0d | 0e d8 29 f1 8a 31 30 2c |r key:".|..)..10,|
|00002fc0| 38 29 22 31 2e 2e 2e 2e | 4c 6f 61 64 20 64 61 74 |8)"1....|Load dat|
|00002fd0| 61 62 61 73 65 20 66 72 | 6f 6d 20 64 69 73 6b 22 |abase fr|om disk"|
|00002fe0| 0d 0e e2 5c e7 20 73 74 | 6f 72 65 64 25 3d 30 20 |...\. st|ored%=0 |
|00002ff0| 8c 20 f1 8a 38 2c 39 29 | 22 2a 20 32 2e 2e 2e 2e |. ..8,9)|"* 2....|
|00003000| 53 61 76 65 20 64 61 74 | 61 62 61 73 65 20 74 6f |Save dat|abase to|
|00003010| 20 64 69 73 6b 22 20 8b | 20 f1 8a 31 30 2c 39 29 | disk" .| ..10,9)|
|00003020| 22 32 2e 2e 2e 2e 53 61 | 76 65 20 64 61 74 61 62 |"2....Sa|ve datab|
|00003030| 61 73 65 20 74 6f 20 64 | 69 73 6b 22 0d 0e ec 73 |ase to d|isk"...s|
|00003040| e7 20 73 74 6f 72 65 64 | 25 3c 70 61 67 65 25 2a |. stored|%<page%*|
|00003050| 31 30 2b 68 69 67 68 25 | 20 8c 20 f1 8a 38 2c 31 |10+high%| . ..8,1|
|00003060| 30 29 22 2a 20 33 2e 2e | 2e 2e 44 65 6c 65 74 65 |0)"* 3..|..Delete|
|00003070| 20 6c 69 6e 65 20 66 72 | 6f 6d 20 64 61 74 61 62 | line fr|om datab|
|00003080| 61 73 65 22 20 8b 20 f1 | 8a 31 30 2c 31 30 29 22 |ase" . .|.10,10)"|
|00003090| 33 2e 2e 2e 2e 44 65 6c | 65 74 65 20 6c 69 6e 65 |3....Del|ete line|
|000030a0| 20 66 72 6f 6d 20 64 61 | 74 61 62 61 73 65 22 0d | from da|tabase".|
|000030b0| 0e f6 3e f1 8a 31 30 2c | 31 31 29 bd 31 33 39 3b |..>..10,|11).139;|
|000030c0| 22 2e 2e 2e 2e 53 65 6c | 65 63 74 20 6c 69 6e 65 |"....Sel|ect line|
|000030d0| 20 20 20 20 20 50 44 2e | 2e 2e 4e 65 78 74 20 70 | PD.|..Next p|
|000030e0| 61 67 65 20 6f 66 20 6c | 69 6e 65 73 22 0d 0f 00 |age of l|ines"...|
|000030f0| 42 f1 8a 31 30 2c 31 32 | 29 bd 31 33 38 3b 22 2e |B..10,12|).138;".|
|00003100| 2e 2e 2e 53 65 6c 65 63 | 74 20 6c 69 6e 65 20 20 |...Selec|t line |
|00003110| 20 20 20 50 55 2e 2e 2e | 50 72 65 76 69 6f 75 73 | PU...|Previous|
|00003120| 20 70 61 67 65 20 6f 66 | 20 6c 69 6e 65 73 22 0d | page of| lines".|
|00003130| 0f 0a 26 f1 8a 31 30 2c | 31 33 29 22 52 2e 2e 2e |..&..10,|13)"R...|
|00003140| 2e 52 65 74 75 72 6e 20 | 74 6f 20 6d 61 69 6e 20 |.Return |to main |
|00003150| 6d 65 6e 75 22 0d 0f 14 | 23 f1 8a 32 2c 31 35 29 |menu"...|#..2,15)|
|00003160| 22 57 68 69 63 68 20 64 | 6f 20 79 6f 75 20 77 61 |"Which d|o you wa|
|00003170| 6e 74 3f 20 5b 20 5d 22 | 0d 0f 1e 13 f1 8a 31 2c |nt? [ ]"|......1,|
|00003180| 31 36 29 c4 37 38 2c 22 | 5f 22 29 0d 0f 28 19 f2 |16).78,"|_")..(..|
|00003190| 73 68 6f 77 5f 64 61 74 | 61 62 61 73 65 28 70 61 |show_dat|abase(pa|
|000031a0| 67 65 25 29 0d 0f 32 0a | f2 74 69 74 6c 65 0d 0f |ge%)..2.|.title..|
|000031b0| 3c 12 f2 73 68 6f 77 5f | 74 69 6d 65 28 33 30 29 |<..show_|time(30)|
|000031c0| 0d 0f 46 31 f2 68 69 67 | 68 5f 73 74 6f 72 65 64 |..F1.hig|h_stored|
|000031d0| 5f 66 6f 72 6d 75 6c 61 | 28 31 36 2c 68 69 67 68 |_formula|(16,high|
|000031e0| 25 2c 70 61 67 65 25 2a | 31 30 2b 68 69 67 68 25 |%,page%*|10+high%|
|000031f0| 29 0d 0f 50 21 6f 6c 64 | 70 61 67 65 25 3d 70 61 |)..P!old|page%=pa|
|00003200| 67 65 25 3a 6f 6c 64 68 | 69 67 68 25 3d 68 69 67 |ge%:oldh|igh%=hig|
|00003210| 68 25 0d 0f 5a 05 f5 0d | 0f 64 24 e7 20 a6 28 2d |h%..Z...|.d$. .(-|
|00003220| 36 34 29 20 80 20 70 61 | 67 65 25 3e 30 20 70 61 |64) . pa|ge%>0 pa|
|00003230| 67 65 25 3d 70 61 67 65 | 25 2d 31 0d 0f 6e 24 e7 |ge%=page|%-1..n$.|
|00003240| 20 a6 28 2d 37 39 29 20 | 80 20 70 61 67 65 25 3c | .(-79) |. page%<|
|00003250| 39 20 70 61 67 65 25 3d | 70 61 67 65 25 2b 31 0d |9 page%=|page%+1.|
|00003260| 0f 78 37 e7 20 a6 28 2d | 35 38 29 20 68 69 67 68 |.x7. .(-|58) high|
|00003270| 25 3d 68 69 67 68 25 2d | 31 3a f2 77 61 69 74 28 |%=high%-|1:.wait(|
|00003280| 31 30 29 3a e7 20 68 69 | 67 68 25 3d 30 20 68 69 |10):. hi|gh%=0 hi|
|00003290| 67 68 25 3d 31 30 0d 0f | 82 37 e7 20 a6 28 2d 34 |gh%=10..|.7. .(-4|
|000032a0| 32 29 20 68 69 67 68 25 | 3d 68 69 67 68 25 2b 31 |2) high%|=high%+1|
|000032b0| 3a f2 77 61 69 74 28 31 | 30 29 3a e7 20 68 69 67 |:.wait(1|0):. hig|
|000032c0| 68 25 3d 31 31 20 68 69 | 67 68 25 3d 31 0d 0f 8c |h%=11 hi|gh%=1...|
|000032d0| 0a 78 3d a6 28 30 29 0d | 0f 96 1e e7 20 78 3c 3e |.x=.(0).|.... x<>|
|000032e0| 2d 31 20 4b 45 59 24 3d | bd 78 20 8b 20 4b 45 59 |-1 KEY$=|.x . KEY|
|000032f0| 24 3d 22 20 22 0d 0f a0 | 21 e7 20 91 3e 31 30 30 |$=" "...|!. .>100|
|00003300| 30 20 8c 20 d1 3d 30 3a | f2 73 68 6f 77 5f 74 69 |0 . .=0:|.show_ti|
|00003310| 6d 65 28 33 30 29 0d 0f | aa 0e f1 20 8a 32 32 2c |me(30)..|... .22,|
|00003320| 31 35 29 3b 0d 0f b4 3c | fd 20 a7 22 31 32 33 34 |15);...<|. ."1234|
|00003330| 35 36 37 38 52 22 2c 4b | 45 59 24 29 20 84 20 6f |5678R",K|EY$) . o|
|00003340| 6c 64 70 61 67 65 25 3c | 3e 70 61 67 65 25 20 84 |ldpage%<|>page% .|
|00003350| 20 6f 6c 64 68 69 67 68 | 25 3c 3e 68 69 67 68 25 | oldhigh|%<>high%|
|00003360| 0d 0f be 29 e7 20 4b 45 | 59 24 3d 22 31 22 20 8c |...). KE|Y$="1" .|
|00003370| 20 f2 6c 6f 61 64 28 64 | 65 66 61 75 6c 74 5f 64 | .load(d|efault_d|
|00003380| 61 74 61 62 61 73 65 24 | 29 0d 0f c8 35 e7 20 4b |atabase$|)...5. K|
|00003390| 45 59 24 3d 22 32 22 20 | 80 20 73 74 6f 72 65 64 |EY$="2" |. stored|
|000033a0| 25 3e 30 20 8c 20 f2 73 | 61 76 65 28 64 65 66 61 |%>0 . .s|ave(defa|
|000033b0| 75 6c 74 5f 64 61 74 61 | 62 61 73 65 24 29 0d 0f |ult_data|base$)..|
|000033c0| d2 51 e7 20 4b 45 59 24 | 3d 22 33 22 20 80 20 73 |.Q. KEY$|="3" . s|
|000033d0| 74 6f 72 65 64 25 3e 3d | 70 61 67 65 25 2a 31 30 |tored%>=|page%*10|
|000033e0| 2b 68 69 67 68 25 20 8c | 20 f2 64 65 6c 65 74 65 |+high% .| .delete|
|000033f0| 5f 73 74 6f 72 65 64 5f | 66 6f 72 6d 75 6c 61 28 |_stored_|formula(|
|00003400| 70 61 67 65 25 2a 31 30 | 2b 68 69 67 68 25 29 0d |page%*10|+high%).|
|00003410| 0f dc 0e fd 20 4b 45 59 | 24 3d 22 52 22 0d 0f e6 |.... KEY|$="R"...|
|00003420| 05 e1 0d 0f f0 05 3a 0d | 0f fa 1a dd f2 73 68 6f |......:.|.....sho|
|00003430| 77 5f 64 61 74 61 62 61 | 73 65 28 70 61 67 65 25 |w_databa|se(page%|
|00003440| 29 0d 10 04 09 ea 20 79 | 2c 6e 0d 10 0e 4c 79 3d |)..... y|,n...Ly=|
|00003450| bc 2b 31 3a f1 8a 31 2c | 79 29 22 6e 22 8a 34 29 |.+1:..1,|y)"n".4)|
|00003460| 22 46 75 6e 63 74 69 6f | 6e 22 8a 33 39 29 22 6d |"Functio|n".39)"m|
|00003470| 69 6e 20 78 22 8a 34 39 | 29 22 6d 61 78 20 78 22 |in x".49|)"max x"|
|00003480| 8a 35 39 29 22 6d 69 6e | 20 79 22 8a 36 39 29 22 |.59)"min| y".69)"|
|00003490| 6d 61 78 20 79 22 0d 10 | 18 21 e3 20 6e 3d 70 61 |max y"..|.!. n=pa|
|000034a0| 67 65 25 2a 31 30 2b 31 | 20 b8 20 28 70 61 67 65 |ge%*10+1| . (page|
|000034b0| 25 2b 31 29 2a 31 30 0d | 10 22 09 79 3d 79 2b 31 |%+1)*10.|.".y=y+1|
|000034c0| 0d 10 2c 59 e7 20 73 74 | 6f 72 65 64 5f 66 75 6e |..,Y. st|ored_fun|
|000034d0| 63 24 28 6e 29 3c 3e 22 | 22 20 f1 8a 31 2c 79 29 |c$(n)<>"|" ..1,y)|
|000034e0| 22 22 3b 6e 3b 8a 35 2c | 79 29 22 79 3d 22 3b 73 |"";n;.5,|y)"y=";s|
|000034f0| 74 6f 72 65 64 5f 66 75 | 6e 63 24 28 6e 29 20 8b |tored_fu|nc$(n) .|
|00003500| 20 f1 8a 31 2c 79 29 3b | 6e 3b 8a 32 30 2c 79 29 | ..1,y);|n;.20,y)|
|00003510| 22 3c 42 6c 61 6e 6b 3e | 22 0d 10 36 5c f1 8a 34 |"<Blank>|"..6\..4|
|00003520| 30 2c 79 29 3b 73 74 6f | 72 65 64 5f 78 6d 69 6e |0,y);sto|red_xmin|
|00003530| 28 6e 29 3b 8a 35 30 2c | 79 29 3b 73 74 6f 72 65 |(n);.50,|y);store|
|00003540| 64 5f 78 6d 61 78 28 6e | 29 3b 8a 36 30 2c 79 29 |d_xmax(n|);.60,y)|
|00003550| 3b 73 74 6f 72 65 64 5f | 79 6d 69 6e 28 6e 29 3b |;stored_|ymin(n);|
|00003560| 8a 37 30 2c 79 29 3b 73 | 74 6f 72 65 64 5f 79 6d |.70,y);s|tored_ym|
|00003570| 61 78 28 6e 29 0d 10 40 | 05 ed 0d 10 4a 05 e1 0d |ax(n)..@|....J...|
|00003580| 10 54 05 3a 0d 10 5e 24 | dd f2 68 69 67 68 5f 73 |.T.:..^$|..high_s|
|00003590| 74 6f 72 65 64 5f 66 6f | 72 6d 75 6c 61 28 79 2c |tored_fo|rmula(y,|
|000035a0| 68 69 67 68 25 2c 6e 29 | 0d 10 68 0b fb 30 3a fb |high%,n)|..h..0:.|
|000035b0| 31 32 39 0d 10 72 16 f1 | 8a 31 2c 79 2b 68 69 67 |129..r..|.1,y+hig|
|000035c0| 68 25 2b 32 29 22 22 3b | 6e 0d 10 7c 57 e7 20 73 |h%+2)"";|n..|W. s|
|000035d0| 74 6f 72 65 64 5f 66 75 | 6e 63 24 28 6e 29 3c 3e |tored_fu|nc$(n)<>|
|000035e0| 22 22 20 f1 8a 35 2c 79 | 2b 68 69 67 68 25 2b 32 |"" ..5,y|+high%+2|
|000035f0| 29 22 79 3d 22 3b 73 74 | 6f 72 65 64 5f 66 75 6e |)"y=";st|ored_fun|
|00003600| 63 24 28 6e 29 20 8b 20 | f1 8a 32 30 2c 79 2b 68 |c$(n) . |..20,y+h|
|00003610| 69 67 68 25 2b 32 29 22 | 3c 42 6c 61 6e 6b 3e 22 |igh%+2)"|<Blank>"|
|00003620| 0d 10 86 7c f1 8a 34 30 | 2c 79 2b 68 69 67 68 25 |...|..40|,y+high%|
|00003630| 2b 32 29 3b 73 74 6f 72 | 65 64 5f 78 6d 69 6e 28 |+2);stor|ed_xmin(|
|00003640| 6e 29 3b 8a 35 30 2c 79 | 2b 68 69 67 68 25 2b 32 |n);.50,y|+high%+2|
|00003650| 29 3b 73 74 6f 72 65 64 | 5f 78 6d 61 78 28 6e 29 |);stored|_xmax(n)|
|00003660| 3b 8a 36 30 2c 79 2b 68 | 69 67 68 25 2b 32 29 3b |;.60,y+h|igh%+2);|
|00003670| 73 74 6f 72 65 64 5f 79 | 6d 69 6e 28 6e 29 3b 8a |stored_y|min(n);.|
|00003680| 37 30 2c 79 2b 68 69 67 | 68 25 2b 32 29 3b 73 74 |70,y+hig|h%+2);st|
|00003690| 6f 72 65 64 5f 79 6d 61 | 78 28 6e 29 0d 10 90 0b |ored_yma|x(n)....|
|000036a0| fb 31 3a fb 31 32 38 0d | 10 9a 05 e1 0d 10 a4 05 |.1:.128.|........|
|000036b0| 3a 0d 10 ae 1e dd f2 64 | 65 6c 65 74 65 5f 73 74 |:......d|elete_st|
|000036c0| 6f 72 65 64 5f 66 6f 72 | 6d 75 6c 61 28 6e 29 0d |ored_for|mula(n).|
|000036d0| 10 b8 19 e7 20 6e 3d 30 | 20 84 20 6e 3e 73 74 6f |.... n=0| . n>sto|
|000036e0| 72 65 64 25 20 8c 20 e1 | 0d 10 c2 41 e7 20 6e 3d |red% . .|...A. n=|
|000036f0| 73 74 6f 72 65 64 25 20 | 8c 20 73 74 6f 72 65 64 |stored% |. stored|
|00003700| 25 3d 73 74 6f 72 65 64 | 25 2d 31 3a f2 73 74 6f |%=stored|%-1:.sto|
|00003710| 72 65 28 30 29 3a 73 74 | 6f 72 65 64 25 3d 73 74 |re(0):st|ored%=st|
|00003720| 6f 72 65 64 25 2d 31 3a | e1 0d 10 cc 15 e3 20 78 |ored%-1:|...... x|
|00003730| 3d 6e 20 b8 20 73 74 6f | 72 65 64 25 2d 31 0d 10 |=n . sto|red%-1..|
|00003740| d6 4b 73 74 6f 72 65 64 | 5f 66 75 6e 63 24 28 78 |.Kstored|_func$(x|
|00003750| 29 3d 73 74 6f 72 65 64 | 5f 66 75 6e 63 24 28 78 |)=stored|_func$(x|
|00003760| 2b 31 29 3a 73 74 6f 72 | 65 64 5f 62 61 73 69 63 |+1):stor|ed_basic|
|00003770| 76 24 28 78 29 3d 73 74 | 6f 72 65 64 5f 62 61 73 |v$(x)=st|ored_bas|
|00003780| 69 63 76 24 28 78 2b 31 | 29 0d 10 e0 43 73 74 6f |icv$(x+1|)...Csto|
|00003790| 72 65 64 5f 78 6d 69 6e | 28 78 29 3d 73 74 6f 72 |red_xmin|(x)=stor|
|000037a0| 65 64 5f 78 6d 69 6e 28 | 78 2b 31 29 3a 73 74 6f |ed_xmin(|x+1):sto|
|000037b0| 72 65 64 5f 78 6d 61 78 | 28 78 29 3d 73 74 6f 72 |red_xmax|(x)=stor|
|000037c0| 65 64 5f 78 6d 61 78 28 | 78 2b 31 29 0d 10 ea 43 |ed_xmax(|x+1)...C|
|000037d0| 73 74 6f 72 65 64 5f 79 | 6d 69 6e 28 78 29 3d 73 |stored_y|min(x)=s|
|000037e0| 74 6f 72 65 64 5f 79 6d | 69 6e 28 78 2b 31 29 3a |tored_ym|in(x+1):|
|000037f0| 73 74 6f 72 65 64 5f 79 | 6d 61 78 28 78 29 3d 73 |stored_y|max(x)=s|
|00003800| 74 6f 72 65 64 5f 79 6d | 61 78 28 78 2b 31 29 0d |tored_ym|ax(x+1).|
|00003810| 10 f4 05 ed 0d 10 fe 31 | 73 74 6f 72 65 64 25 3d |.......1|stored%=|
|00003820| 73 74 6f 72 65 64 25 2d | 31 3a f2 73 74 6f 72 65 |stored%-|1:.store|
|00003830| 28 30 29 3a 73 74 6f 72 | 65 64 25 3d 73 74 6f 72 |(0):stor|ed%=stor|
|00003840| 65 64 25 2d 31 0d 11 08 | 05 e1 0d 11 12 05 3a 0d |ed%-1...|......:.|
|00003850| 11 1c 0e dd f2 65 72 72 | 6f 72 28 6e 29 0d 11 26 |.....err|or(n)..&|
|00003860| 07 ea 20 78 0d 11 30 0c | db 3a f7 20 8d 44 76 51 |.. x..0.|.:. .DvQ|
|00003870| 0d 11 3a 0d e3 20 78 3d | 31 20 b8 20 6e 0d 11 44 |..:.. x=|1 . n..D|
|00003880| 0c f3 20 65 72 72 6f 72 | 24 0d 11 4e 05 ed 0d 11 |.. error|$..N....|
|00003890| 58 1b f1 8a 31 2c 31 30 | 29 20 a4 63 65 6e 74 72 |X...1,10|) .centr|
|000038a0| 65 28 65 72 72 6f 72 24 | 29 0d 11 62 0e f2 77 61 |e(error$|)..b..wa|
|000038b0| 69 74 28 32 30 30 29 0d | 11 6c 05 e1 0d 11 76 29 |it(200).|.l....v)|
|000038c0| dc 20 55 6e 61 62 6c 65 | 20 74 6f 20 63 72 65 61 |. Unable| to crea|
|000038d0| 74 65 20 63 6f 6e 66 69 | 67 75 72 61 74 69 6f 6e |te confi|guration|
|000038e0| 20 66 69 6c 65 0d 11 80 | 27 dc 20 55 6e 61 62 6c | file...|'. Unabl|
|000038f0| 65 20 74 6f 20 72 65 61 | 64 20 63 6f 6e 66 69 67 |e to rea|d config|
|00003900| 75 72 61 74 69 6f 6e 20 | 66 69 6c 65 0d 11 8a 3d |uration |file...=|
|00003910| dc 20 59 6f 75 20 68 61 | 76 65 20 65 6e 74 65 72 |. You ha|ve enter|
|00003920| 65 64 20 61 6e 20 69 6e | 63 6f 6d 70 72 65 68 65 |ed an in|comprehe|
|00003930| 73 69 62 6c 65 20 66 75 | 6e 63 74 69 6f 6e 2e 20 |sible fu|nction. |
|00003940| 54 72 79 20 61 67 61 69 | 6e 0d 11 94 23 dc 20 55 |Try agai|n...#. U|
|00003950| 6e 61 62 6c 65 20 74 6f | 20 66 69 6e 64 20 64 61 |nable to| find da|
|00003960| 74 61 62 61 73 65 20 66 | 69 6c 65 2e 0d 11 9e 23 |tabase f|ile....#|
|00003970| dc 20 55 6e 61 62 6c 65 | 20 74 6f 20 73 61 76 65 |. Unable| to save|
|00003980| 20 64 61 74 61 62 61 73 | 65 20 66 69 6c 65 2e 0d | databas|e file..|
|00003990| 11 a8 30 dc 20 4d 61 78 | 69 6d 75 6d 20 58 20 63 |..0. Max|imum X c|
|000039a0| 61 6e 6e 6f 74 20 62 65 | 20 73 6d 61 6c 6c 65 72 |annot be| smaller|
|000039b0| 20 74 68 61 6e 20 6d 69 | 6e 69 6d 75 6d 20 58 0d | than mi|nimum X.|
|000039c0| 11 b2 05 3a 0d 11 bc 0f | dd f2 73 79 73 5f 65 72 |...:....|..sys_er|
|000039d0| 72 6f 72 0d 11 c6 0d ef | 32 36 3a db 3a d9 23 30 |ror.....|26:.:.#0|
|000039e0| 0d 11 d0 52 e7 20 9f 3d | 31 37 20 80 20 a6 28 2d |...R. .=|17 . .(-|
|000039f0| 31 29 20 e8 22 45 6e 74 | 65 72 20 70 61 73 73 77 |1) ."Ent|er passw|
|00003a00| 6f 72 64 3a 20 22 70 61 | 73 73 24 3a e7 20 70 61 |ord: "pa|ss$:. pa|
|00003a10| 73 73 24 3d 63 6f 6e 66 | 69 67 5f 70 61 73 73 24 |ss$=conf|ig_pass$|
|00003a20| 20 63 6f 6e 66 69 67 75 | 72 65 5f 6f 6b 25 3d b9 | configu|re_ok%=.|
|00003a30| 3a e1 0d 11 da 16 db 3a | f6 3a f1 22 20 61 74 20 |:......:|.:." at |
|00003a40| 6c 69 6e 65 20 22 3b 9e | 0d 11 e4 0e f2 77 61 69 |line ";.|.....wai|
|00003a50| 74 28 31 30 30 29 0d 11 | ee 10 e7 20 64 65 62 75 |t(100)..|... debu|
|00003a60| 67 25 3d a3 20 e1 0d 11 | f8 0e ef 32 32 2c 30 3a |g%=. ...|...22,0:|
|00003a70| 2a 46 58 34 0d 12 02 05 | e0 0d 12 0c 05 3a 0d 12 |*FX4....|.....:..|
|00003a80| 16 0d dd f2 77 61 69 74 | 28 6e 29 0d 12 20 07 d1 |....wait|(n).. ..|
|00003a90| 3d 30 0d 12 2a 0b f5 20 | fd 20 91 3e 6e 0d 12 34 |=0..*.. |. .>n..4|
|00003aa0| 05 e1 0d 12 3e 05 3a 0d | 12 48 0f dd a4 74 6f 67 |....>.:.|.H...tog|
|00003ab0| 67 6c 65 28 6e 29 0d 12 | 52 0f e7 20 6e 3d 2d 31 |gle(n)..|R.. n=-1|
|00003ac0| 20 8c 20 3d 30 0d 12 5c | 07 3d 2d 31 0d 12 66 05 | . =0..\|.=-1..f.|
|00003ad0| 3a 0d 12 70 0b dd f2 6f | 73 63 6c 69 0d 12 7a 08 |:..p...o|scli..z.|
|00003ae0| ea 20 61 24 0d 12 84 38 | db 3a f2 74 69 74 6c 65 |. a$...8|.:.title|
|00003af0| 3a ef 32 38 2c 32 2c 33 | 30 2c 37 36 2c 31 3a f1 |:.28,2,3|0,76,1:.|
|00003b00| 22 3c 52 65 74 75 72 6e | 3e 20 74 6f 20 72 65 74 |"<Return|> to ret|
|00003b10| 75 72 6e 20 74 6f 20 6d | 65 6e 75 22 0d 12 8e 05 |urn to m|enu"....|
|00003b20| f5 0d 12 98 0a e8 22 2a | 22 61 24 0d 12 a2 12 e7 |......"*|"a$.....|
|00003b30| 20 61 24 3c 3e 22 22 20 | ff 28 61 24 29 0d 12 ac | a$<>"" |.(a$)...|
|00003b40| 0b fd 20 61 24 3d 22 22 | 0d 12 b6 09 ef 32 36 3a |.. a$=""|.....26:|
|00003b50| e1 0d 12 c0 05 3a 0d 12 | ca 15 dd f2 67 65 74 5f |.....:..|....get_|
|00003b60| 6e 65 77 5f 66 6f 72 6d | 75 6c 61 0d 12 d4 0c ea |new_form|ula.....|
|00003b70| 20 6e 2c 4b 45 59 24 0d | 12 de 10 db 3a ef 31 39 | n,KEY$.|....:.19|
|00003b80| 2c 30 2c 34 3b 30 3b 0d | 12 e8 30 f1 8a 30 2c 34 |,0,4;0;.|..0..0,4|
|00003b90| 29 a4 63 65 6e 74 72 65 | 28 22 41 20 44 20 44 20 |).centre|("A D D |
|00003ba0| 20 20 41 20 20 20 4e 20 | 45 20 57 20 20 20 4c 20 | A N |E W L |
|00003bb0| 49 20 4e 20 45 22 29 0d | 12 f2 16 f2 73 68 6f 77 |I N E").|....show|
|00003bc0| 5f 66 6f 72 6d 75 6c 61 | 73 28 31 37 29 0d 12 fc |_formula|s(17)...|
|00003bd0| 0a f2 74 69 74 6c 65 0d | 13 06 11 ef 32 38 2c 31 |..title.|....28,1|
|00003be0| 2c 31 36 2c 37 37 2c 36 | 0d 13 10 07 f5 3a db 0d |,16,77,6|.....:..|
|00003bf0| 13 1a 2a f1 8a 30 2c 30 | 29 22 46 75 6e 63 74 69 |..*..0,0|)"Functi|
|00003c00| 6f 6e 20 22 3b 66 75 6e | 63 74 69 6f 6e 25 2b 31 |on ";fun|ction%+1|
|00003c10| 3b 22 20 3a 20 79 3d 22 | 3b 0d 13 24 0f e8 22 22 |;" : y="|;..$..""|
|00003c20| 66 6f 72 6d 75 6c 61 24 | 0d 13 2e 1d e7 20 66 6f |formula$|..... fo|
|00003c30| 72 6d 75 6c 61 24 3d 22 | 22 20 fd 20 b9 3a ef 32 |rmula$="|" . .:.2|
|00003c40| 36 3a db 3a e1 0d 13 38 | 1c 66 6f 72 6d 75 6c 61 |6:.:...8|.formula|
|00003c50| 24 3d a4 63 61 73 65 28 | 66 6f 72 6d 75 6c 61 24 |$=.case(|formula$|
|00003c60| 29 0d 13 42 2f e7 20 a4 | 62 61 73 69 63 5f 76 65 |)..B/. .|basic_ve|
|00003c70| 72 73 69 6f 6e 28 66 6f | 72 6d 75 6c 61 24 2c b9 |rsion(fo|rmula$,.|
|00003c80| 29 3d 22 22 20 8c 20 f2 | 65 72 72 6f 72 28 33 29 |)="" . .|error(3)|
|00003c90| 0d 13 4c 24 fd 20 a4 62 | 61 73 69 63 5f 76 65 72 |..L$. .b|asic_ver|
|00003ca0| 73 69 6f 6e 28 66 6f 72 | 6d 75 6c 61 24 2c b9 29 |sion(for|mula$,.)|
|00003cb0| 3c 3e 22 22 0d 13 56 21 | 6e 3d a4 73 65 61 72 63 |<>""..V!|n=.searc|
|00003cc0| 68 28 a4 61 6c 67 65 62 | 72 61 28 66 6f 72 6d 75 |h(.algeb|ra(formu|
|00003cd0| 6c 61 24 29 29 0d 13 60 | 51 e7 20 6e 3d 30 20 f1 |la$))..`|Q. n=0 .|
|00003ce0| 22 54 68 69 73 20 66 6f | 72 6d 75 6c 61 20 69 73 |"This fo|rmula is|
|00003cf0| 20 6e 6f 74 20 73 74 6f | 72 65 64 20 69 6e 20 74 | not sto|red in t|
|00003d00| 68 65 20 64 61 74 61 62 | 61 73 65 2e 22 3a f2 67 |he datab|ase.":.g|
|00003d10| 65 74 5f 64 6f 6d 61 69 | 6e 28 bc 2c 6e 29 3a ef |et_domai|n(.,n):.|
|00003d20| 32 36 3a db 3a e1 0d 13 | 6a 15 f4 20 73 68 6f 77 |26:.:...|j.. show|
|00003d30| 20 64 65 66 69 6e 69 74 | 69 6f 6e 0d 13 74 05 db | definit|ion..t..|
|00003d40| 0d 13 7e 32 f1 20 22 79 | 3d 22 3b 73 74 6f 72 65 |..~2. "y|=";store|
|00003d50| 64 5f 66 75 6e 63 24 28 | 6e 29 3b 22 20 68 61 73 |d_func$(|n);" has|
|00003d60| 20 62 65 65 6e 20 73 65 | 65 6e 20 62 65 66 6f 72 | been se|en befor|
|00003d70| 65 22 0d 13 88 35 f1 20 | 22 44 6f 6d 61 69 6e 3a |e"...5. |"Domain:|
|00003d80| 20 22 3b 73 74 6f 72 65 | 64 5f 78 6d 69 6e 28 6e | ";store|d_xmin(n|
|00003d90| 29 3b 22 20 74 6f 20 22 | 3b 73 74 6f 72 65 64 5f |);" to "|;stored_|
|00003da0| 78 6d 61 78 28 6e 29 0d | 13 92 36 f1 20 22 79 20 |xmax(n).|..6. "y |
|00003db0| 72 61 6e 67 65 3a 20 22 | 3b 73 74 6f 72 65 64 5f |range: "|;stored_|
|00003dc0| 79 6d 69 6e 28 6e 29 3b | 22 20 74 6f 20 22 3b 73 |ymin(n);|" to ";s|
|00003dd0| 74 6f 72 65 64 5f 79 6d | 61 78 28 6e 29 0d 13 9c |tored_ym|ax(n)...|
|00003de0| 30 f1 20 22 44 6f 20 79 | 6f 75 20 77 69 73 68 20 |0. "Do y|ou wish |
|00003df0| 74 6f 20 75 73 65 20 74 | 68 65 73 65 20 76 61 6c |to use t|hese val|
|00003e00| 75 65 73 3f 20 28 59 2f | 4e 29 20 22 3b 0d 13 a6 |ues? (Y/|N) ";...|
|00003e10| 05 f5 0d 13 b0 0a 4b 45 | 59 24 3d be 0d 13 ba 19 |......KE|Y$=.....|
|00003e20| fd 20 4b 45 59 24 3d 22 | 59 22 20 84 20 4b 45 59 |. KEY$="|Y" . KEY|
|00003e30| 24 3d 22 4e 22 0d 13 c4 | 3f e7 20 4b 45 59 24 3d |$="N"...|?. KEY$=|
|00003e40| 22 4e 22 20 db 3a f1 22 | 79 3d 22 3b 73 74 6f 72 |"N" .:."|y=";stor|
|00003e50| 65 64 5f 66 75 6e 63 24 | 28 6e 29 3a f2 67 65 74 |ed_func$|(n):.get|
|00003e60| 5f 64 6f 6d 61 69 6e 28 | bc 2c 6e 29 3a ef 32 36 |_domain(|.,n):.26|
|00003e70| 3a db 3a e1 0d 13 ce 19 | 66 75 6e 63 74 69 6f 6e |:.:.....|function|
|00003e80| 25 3d 66 75 6e 63 74 69 | 6f 6e 25 2b 31 0d 13 d8 |%=functi|on%+1...|
|00003e90| 24 66 75 6e 63 24 28 66 | 75 6e 63 74 69 6f 6e 25 |$func$(f|unction%|
|00003ea0| 29 3d 73 74 6f 72 65 64 | 5f 66 75 6e 63 24 28 6e |)=stored|_func$(n|
|00003eb0| 29 0d 13 e2 22 78 6d 69 | 6e 28 66 75 6e 63 74 69 |)..."xmi|n(functi|
|00003ec0| 6f 6e 25 29 3d 73 74 6f | 72 65 64 5f 78 6d 69 6e |on%)=sto|red_xmin|
|00003ed0| 28 6e 29 0d 13 ec 22 78 | 6d 61 78 28 66 75 6e 63 |(n)..."x|max(func|
|00003ee0| 74 69 6f 6e 25 29 3d 73 | 74 6f 72 65 64 5f 78 6d |tion%)=s|tored_xm|
|00003ef0| 61 78 28 6e 29 0d 13 f6 | 22 79 6d 69 6e 28 66 75 |ax(n)...|"ymin(fu|
|00003f00| 6e 63 74 69 6f 6e 25 29 | 3d 73 74 6f 72 65 64 5f |nction%)|=stored_|
|00003f10| 79 6d 69 6e 28 6e 29 0d | 14 00 22 79 6d 61 78 28 |ymin(n).|.."ymax(|
|00003f20| 66 75 6e 63 74 69 6f 6e | 25 29 3d 73 74 6f 72 65 |function|%)=store|
|00003f30| 64 5f 79 6d 61 78 28 6e | 29 0d 14 0a 28 62 61 73 |d_ymax(n|)...(bas|
|00003f40| 69 63 76 24 28 66 75 6e | 63 74 69 6f 6e 25 29 3d |icv$(fun|ction%)=|
|00003f50| 73 74 6f 72 65 64 5f 62 | 61 73 69 63 76 24 28 6e |stored_b|asicv$(n|
|00003f60| 29 0d 14 14 0b ef 32 36 | 3a db 3a e1 0d 14 1e 05 |).....26|:.:.....|
|00003f70| 3a 0d 14 28 15 dd f2 67 | 65 74 5f 64 6f 6d 61 69 |:..(...g|et_domai|
|00003f80| 6e 28 79 2c 6e 29 0d 14 | 32 0a ea 20 4b 45 59 24 |n(y,n)..|2.. KEY$|
|00003f90| 0d 14 3c 43 f5 3a db 3a | f1 8a 30 2c 79 2d 32 29 |..<C.:.:|..0,y-2)|
|00003fa0| 20 22 46 75 6e 63 74 69 | 6f 6e 20 22 3b 66 75 6e | "Functi|on ";fun|
|00003fb0| 63 74 69 6f 6e 25 2b 31 | 3b 22 20 3a 20 79 3d 22 |ction%+1|;" : y="|
|00003fc0| 3b a4 61 6c 67 65 62 72 | 61 28 66 6f 72 6d 75 6c |;.algebr|a(formul|
|00003fd0| 61 24 29 0d 14 46 48 e8 | 8a 30 2c 79 29 22 4d 69 |a$)..FH.|.0,y)"Mi|
|00003fe0| 6e 69 6d 75 6d 20 58 3a | 20 22 78 6d 69 6e 69 6d |nimum X:| "xminim|
|00003ff0| 75 6d 24 3a 78 6d 69 6e | 69 6d 75 6d 3d a0 28 a4 |um$:xmin|imum=.(.|
|00004000| 62 61 73 69 63 5f 76 65 | 72 73 69 6f 6e 28 78 6d |basic_ve|rsion(xm|
|00004010| 69 6e 69 6d 75 6d 24 2c | a3 29 29 0d 14 50 4a e8 |inimum$,|.))..PJ.|
|00004020| 8a 30 2c 79 2b 31 29 22 | 4d 61 78 69 6d 75 6d 20 |.0,y+1)"|Maximum |
|00004030| 58 3a 20 22 78 6d 61 78 | 69 6d 75 6d 24 3a 78 6d |X: "xmax|imum$:xm|
|00004040| 61 78 69 6d 75 6d 3d a0 | 28 a4 62 61 73 69 63 5f |aximum=.|(.basic_|
|00004050| 76 65 72 73 69 6f 6e 28 | 78 6d 61 78 69 6d 75 6d |version(|xmaximum|
|00004060| 24 2c a3 29 29 0d 14 5a | 24 e7 20 78 6d 61 78 69 |$,.))..Z|$. xmaxi|
|00004070| 6d 75 6d 3c 3d 78 6d 69 | 6e 69 6d 75 6d 20 8c 20 |mum<=xmi|nimum . |
|00004080| f2 65 72 72 6f 72 28 36 | 29 0d 14 64 2c fd 20 78 |.error(6|)..d,. x|
|00004090| 6d 69 6e 69 6d 75 6d 3c | 3e 78 6d 61 78 69 6d 75 |minimum<|>xmaximu|
|000040a0| 6d 20 80 20 78 6d 61 78 | 69 6d 75 6d 3e 78 6d 69 |m . xmax|imum>xmi|
|000040b0| 6e 69 6d 75 6d 0d 14 6e | 19 66 75 6e 63 74 69 6f |nimum..n|.functio|
|000040c0| 6e 25 3d 66 75 6e 63 74 | 69 6f 6e 25 2b 31 0d 14 |n%=funct|ion%+1..|
|000040d0| 78 31 62 61 73 69 63 76 | 24 28 66 75 6e 63 74 69 |x1basicv|$(functi|
|000040e0| 6f 6e 25 29 3d a4 62 61 | 73 69 63 5f 76 65 72 73 |on%)=.ba|sic_vers|
|000040f0| 69 6f 6e 28 66 6f 72 6d | 75 6c 61 24 2c b9 29 0d |ion(form|ula$,.).|
|00004100| 14 82 27 66 75 6e 63 24 | 28 66 75 6e 63 74 69 6f |..'func$|(functio|
|00004110| 6e 25 29 3d a4 61 6c 67 | 65 62 72 61 28 66 6f 72 |n%)=.alg|ebra(for|
|00004120| 6d 75 6c 61 24 29 0d 14 | 8c 1c 78 6d 69 6e 28 66 |mula$)..|..xmin(f|
|00004130| 75 6e 63 74 69 6f 6e 25 | 29 3d 78 6d 69 6e 69 6d |unction%|)=xminim|
|00004140| 75 6d 0d 14 96 1c 78 6d | 61 78 28 66 75 6e 63 74 |um....xm|ax(funct|
|00004150| 69 6f 6e 25 29 3d 78 6d | 61 78 69 6d 75 6d 0d 14 |ion%)=xm|aximum..|
|00004160| a0 1b f2 67 65 74 5f 79 | 5f 72 61 6e 67 65 28 66 |...get_y|_range(f|
|00004170| 75 6e 63 74 69 6f 6e 25 | 29 0d 14 aa 46 f1 27 22 |unction%|)...F.'"|
|00004180| 44 6f 20 79 6f 75 20 77 | 69 73 68 20 74 6f 20 73 |Do you w|ish to s|
|00004190| 74 6f 72 65 20 74 68 69 | 73 20 69 6e 66 6f 72 6d |tore thi|s inform|
|000041a0| 61 74 69 6f 6e 20 69 6e | 20 74 68 65 20 64 61 74 |ation in| the dat|
|000041b0| 61 62 61 73 65 3f 20 28 | 59 2f 4e 29 20 22 3b 0d |abase? (|Y/N) ";.|
|000041c0| 14 b4 05 f5 0d 14 be 0a | 4b 45 59 24 3d be 0d 14 |........|KEY$=...|
|000041d0| c8 19 fd 20 4b 45 59 24 | 3d 22 59 22 20 84 20 4b |... KEY$|="Y" . K|
|000041e0| 45 59 24 3d 22 4e 22 0d | 14 d2 0a f1 20 4b 45 59 |EY$="N".|.... KEY|
|000041f0| 24 0d 14 dc 10 e7 20 4b | 45 59 24 3d 22 4e 22 20 |$..... K|EY$="N" |
|00004200| e1 0d 14 e6 15 f2 73 74 | 6f 72 65 28 66 75 6e 63 |......st|ore(func|
|00004210| 74 69 6f 6e 25 29 0d 14 | f0 05 e1 0d 14 fa 05 3a |tion%)..|.......:|
|00004220| 0d 15 04 0e dd f2 73 74 | 6f 72 65 28 78 29 0d 15 |......st|ore(x)..|
|00004230| 0e 07 ea 20 6e 0d 15 18 | 17 6e 3d a4 73 65 61 72 |... n...|.n=.sear|
|00004240| 63 68 28 66 75 6e 63 24 | 28 78 29 29 0d 15 22 25 |ch(func$|(x)).."%|
|00004250| e7 20 6e 3d 30 20 73 74 | 6f 72 65 64 25 3d 73 74 |. n=0 st|ored%=st|
|00004260| 6f 72 65 64 25 2b 31 3a | 6e 3d 73 74 6f 72 65 64 |ored%+1:|n=stored|
|00004270| 25 0d 15 2c 1c 73 74 6f | 72 65 64 5f 66 75 6e 63 |%..,.sto|red_func|
|00004280| 24 28 6e 29 3d 66 75 6e | 63 24 28 78 29 0d 15 36 |$(n)=fun|c$(x)..6|
|00004290| 1a 73 74 6f 72 65 64 5f | 78 6d 69 6e 28 6e 29 3d |.stored_|xmin(n)=|
|000042a0| 78 6d 69 6e 28 78 29 0d | 15 40 1a 73 74 6f 72 65 |xmin(x).|.@.store|
|000042b0| 64 5f 78 6d 61 78 28 6e | 29 3d 78 6d 61 78 28 78 |d_xmax(n|)=xmax(x|
|000042c0| 29 0d 15 4a 1a 73 74 6f | 72 65 64 5f 79 6d 69 6e |)..J.sto|red_ymin|
|000042d0| 28 6e 29 3d 79 6d 69 6e | 28 78 29 0d 15 54 1a 73 |(n)=ymin|(x)..T.s|
|000042e0| 74 6f 72 65 64 5f 79 6d | 61 78 28 6e 29 3d 79 6d |tored_ym|ax(n)=ym|
|000042f0| 61 78 28 78 29 0d 15 5e | 20 73 74 6f 72 65 64 5f |ax(x)..^| stored_|
|00004300| 62 61 73 69 63 76 24 28 | 6e 29 3d 62 61 73 69 63 |basicv$(|n)=basic|
|00004310| 76 24 28 78 29 0d 15 68 | 05 e1 0d 15 72 05 3a 0d |v$(x)..h|....r.:.|
|00004320| 15 7c 10 dd a4 73 65 61 | 72 63 68 28 61 24 29 0d |.|...sea|rch(a$).|
|00004330| 15 86 07 ea 20 78 0d 15 | 90 14 e7 20 73 74 6f 72 |.... x..|... stor|
|00004340| 65 64 25 3d 30 20 8c 20 | 3d 30 0d 15 9a 0f 78 3d |ed%=0 . |=0....x=|
|00004350| 30 3a f5 3a 78 3d 78 2b | 31 0d 15 a4 24 fd 20 61 |0:.:x=x+|1...$. a|
|00004360| 24 3d 73 74 6f 72 65 64 | 5f 66 75 6e 63 24 28 78 |$=stored|_func$(x|
|00004370| 29 20 84 20 78 3d 73 74 | 6f 72 65 64 25 0d 15 ae |) . x=st|ored%...|
|00004380| 1e e7 20 61 24 3c 3e 73 | 74 6f 72 65 64 5f 66 75 |.. a$<>s|tored_fu|
|00004390| 6e 63 24 28 78 29 20 8c | 20 3d 30 0d 15 b8 06 3d |nc$(x) .| =0....=|
|000043a0| 78 0d 15 c2 05 3a 0d 15 | cc 0e dd a4 63 61 73 65 |x....:..|....case|
|000043b0| 28 61 24 29 0d 15 d6 07 | ea 20 78 0d 15 e0 0f e3 |(a$)....|. x.....|
|000043c0| 20 78 3d 31 20 b8 20 a9 | 61 24 0d 15 ea 12 63 68 | x=1 . .|a$....ch|
|000043d0| 61 72 24 3d c1 61 24 2c | 78 2c 31 29 0d 15 f4 3f |ar$=.a$,|x,1)...?|
|000043e0| e7 20 97 63 68 61 72 24 | 3e 36 34 20 80 20 97 63 |. .char$|>64 . .c|
|000043f0| 68 61 72 24 3c 39 31 20 | 8c 20 61 24 3d c0 61 24 |har$<91 |. a$=.a$|
|00004400| 2c 78 2d 31 29 2b bd 28 | 97 63 68 61 72 24 2b 33 |,x-1)+.(|.char$+3|
|00004410| 32 29 2b c1 61 24 2c 78 | 2b 31 29 0d 15 fe 05 ed |2)+.a$,x|+1).....|
|00004420| 0d 16 08 07 3d 61 24 0d | 16 12 05 3a 0d 16 1c 1d |....=a$.|...:....|
|00004430| dd a4 62 61 73 69 63 5f | 76 65 72 73 69 6f 6e 28 |..basic_|version(|
|00004440| 61 24 2c 74 65 73 74 25 | 29 0d 16 26 13 ea 20 78 |a$,test%|)..&.. x|
|00004450| 2c 66 6c 61 67 25 2c 62 | 24 2c 63 24 0d 16 30 0a |,flag%,b|$,c$..0.|
|00004460| f7 20 8d 54 74 57 0d 16 | 3a 05 f5 0d 16 44 0b f3 |. .TtW..|:....D..|
|00004470| 20 62 24 2c 63 24 0d 16 | 4e 25 e7 20 63 24 3d 22 | b$,c$..|N%. c$="|
|00004480| 53 49 4e 22 20 80 20 72 | 61 64 25 3d a3 20 8c 20 |SIN" . r|ad%=. . |
|00004490| 63 24 3d 22 53 49 4e 52 | 41 44 22 0d 16 58 25 e7 |c$="SINR|AD"..X%.|
|000044a0| 20 63 24 3d 22 43 4f 53 | 22 20 80 20 72 61 64 25 | c$="COS|" . rad%|
|000044b0| 3d a3 20 8c 20 63 24 3d | 22 43 4f 53 52 41 44 22 |=. . c$=|"COSRAD"|
|000044c0| 0d 16 62 25 e7 20 63 24 | 3d 22 54 41 4e 22 20 80 |..b%. c$|="TAN" .|
|000044d0| 20 72 61 64 25 3d a3 20 | 8c 20 63 24 3d 22 54 41 | rad%=. |. c$="TA|
|000044e0| 4e 52 41 44 22 0d 16 6c | 21 e7 20 62 24 3c 3e 22 |NRAD"..l|!. b$<>"|
|000044f0| 23 22 20 f5 20 fd 20 a4 | 72 65 70 6c 61 63 65 28 |#" . . .|replace(|
|00004500| 62 24 2c 63 24 29 0d 16 | 76 0c fd 20 62 24 3d 22 |b$,c$)..|v.. b$="|
|00004510| 23 22 0d 16 80 05 f5 0d | 16 8a 0b 66 6c 61 67 25 |#"......|...flag%|
|00004520| 3d a3 0d 16 94 0f e3 20 | 78 3d 31 20 b8 20 a9 61 |=...... |x=1 . .a|
|00004530| 24 0d 16 9e 1d 62 24 3d | c1 61 24 2c 78 2c 31 29 |$....b$=|.a$,x,1)|
|00004540| 3a 63 24 3d c1 61 24 2c | 78 2b 31 2c 31 29 0d 16 |:c$=.a$,|x+1,1)..|
|00004550| a8 a8 e7 20 a7 22 31 32 | 33 34 35 36 37 38 39 30 |... ."12|34567890|
|00004560| 61 62 63 64 65 66 67 68 | 69 6a 6b 6c 6d 6e 6f 70 |abcdefgh|ijklmnop|
|00004570| 71 72 73 74 75 76 77 78 | 79 7a 29 22 2c 62 24 29 |qrstuvwx|yz)",b$)|
|00004580| 3e 30 20 80 20 a7 22 61 | 62 63 65 64 66 67 68 69 |>0 . ."a|bcedfghi|
|00004590| 6a 6b 6c 6d 6e 6f 70 71 | 72 73 74 75 76 77 78 79 |jklmnopq|rstuvwxy|
|000045a0| 7a 41 42 43 44 45 46 47 | 48 49 4a 4c 4d 4e 4f 50 |zABCDEFG|HIJLMNOP|
|000045b0| 51 52 53 54 55 56 57 58 | 59 5a 28 22 2c 63 24 29 |QRSTUVWX|YZ(",c$)|
|000045c0| 3e 30 20 80 20 63 24 3c | 3e 22 22 20 80 20 66 6c |>0 . c$<|>"" . fl|
|000045d0| 61 67 25 3d a3 20 8c 20 | 66 6c 61 67 25 3d b9 3a |ag%=. . |flag%=.:|
|000045e0| 61 24 3d c0 61 24 2c 78 | 29 2b 22 2a 22 2b c1 61 |a$=.a$,x|)+"*"+.a|
|000045f0| 24 2c 78 2b 31 29 0d 16 | b2 05 ed 0d 16 bc 0d fd |$,x+1)..|........|
|00004600| 20 66 6c 61 67 25 3d a3 | 0d 16 c6 05 f5 0d 16 d0 | flag%=.|........|
|00004610| 0b 66 6c 61 67 25 3d a3 | 0d 16 da 0f e3 20 78 3d |.flag%=.|..... x=|
|00004620| 31 20 b8 20 a9 61 24 0d | 16 e4 0f 62 24 3d c1 61 |1 . .a$.|...b$=.a|
|00004630| 24 2c 78 2c 31 29 0d 16 | ee 70 e7 20 a7 22 61 62 |$,x,1)..|.p. ."ab|
|00004640| 63 64 65 66 67 68 69 6a | 6b 6c 6d 6e 6f 70 71 72 |cdefghij|klmnopqr|
|00004650| 73 74 75 76 77 78 79 7a | 22 2c 62 24 29 3e 30 20 |stuvwxyz|",b$)>0 |
|00004660| 8c 20 61 24 3d c0 61 24 | 2c 78 2d 31 29 2b bd 28 |. a$=.a$|,x-1)+.(|
|00004670| 36 34 2b a7 22 61 62 63 | 64 65 66 67 68 69 6a 6b |64+."abc|defghijk|
|00004680| 6c 6d 6e 6f 70 71 72 73 | 74 75 76 77 78 79 7a 22 |lmnopqrs|tuvwxyz"|
|00004690| 2c 62 24 29 29 2b c1 61 | 24 2c 78 2b 31 29 3a 66 |,b$))+.a|$,x+1):f|
|000046a0| 6c 61 67 25 3d b9 0d 16 | f8 05 ed 0d 17 02 0d fd |lag%=...|........|
|000046b0| 20 66 6c 61 67 25 3d a3 | 0d 17 0c 13 e7 20 74 65 | flag%=.|..... te|
|000046c0| 73 74 25 3d a3 20 8c 20 | 3d 61 24 0d 17 16 33 e7 |st%=. . |=a$...3.|
|000046d0| 20 28 a7 61 24 2c 22 58 | 22 29 3d 30 20 80 20 bb | (.a$,"X|")=0 . .|
|000046e0| 28 61 24 29 3d 30 29 20 | 84 20 a7 61 24 2c 22 59 |(a$)=0) |. .a$,"Y|
|000046f0| 22 29 20 8c 20 3d 22 22 | 20 8b 20 3d 61 24 0d 17 |") . =""| . =a$..|
|00004700| 20 27 f4 20 64 6f 20 61 | 6c 6c 20 6f 70 65 72 61 | '. do a|ll opera|
|00004710| 74 6f 72 73 20 62 65 66 | 6f 72 65 20 76 61 72 69 |tors bef|ore vari|
|00004720| 61 62 6c 65 73 0d 17 2a | 3c f4 20 69 66 20 61 6e |ables..*|<. if an|
|00004730| 79 74 68 69 6e 67 20 72 | 65 6d 61 69 6e 73 20 69 |ything r|emains i|
|00004740| 6e 20 6c 6f 77 65 72 20 | 63 61 73 65 20 74 68 65 |n lower |case the|
|00004750| 6e 20 69 74 20 6d 75 73 | 74 20 62 65 20 76 6f 69 |n it mus|t be voi|
|00004760| 64 0d 17 34 3e dc 20 69 | 6e 76 73 69 6e 2c 41 53 |d..4>. i|nvsin,AS|
|00004770| 4e 2c 69 6e 76 63 6f 73 | 2c 41 43 53 2c 69 6e 76 |N,invcos|,ACS,inv|
|00004780| 74 61 6e 2c 41 54 4e 2c | 73 69 6e 2c 53 49 4e 2c |tan,ATN,|sin,SIN,|
|00004790| 63 6f 73 2c 43 4f 53 2c | 74 61 6e 2c 54 41 4e 0d |cos,COS,|tan,TAN.|
|000047a0| 17 3e 25 dc 20 73 65 63 | 2c 31 2f 43 4f 53 2c 63 |.>%. sec|,1/COS,c|
|000047b0| 6f 73 65 63 2c 31 2f 53 | 49 4e 2c 63 6f 74 2c 31 |osec,1/S|IN,cot,1|
|000047c0| 2f 54 41 4e 0d 17 48 41 | dc 20 73 71 72 2c 53 51 |/TAN..HA|. sqr,SQ|
|000047d0| 52 2c 6c 6e 2c 4c 4e 2c | 6c 6f 67 2c 4c 4f 47 2c |R,ln,LN,|log,LOG,|
|000047e0| 64 65 67 2c 44 45 47 2c | 72 61 64 2c 52 41 44 2c |deg,DEG,|rad,RAD,|
|000047f0| 65 78 70 2c 45 58 50 2c | 7c 2c 41 42 53 2c 69 6e |exp,EXP,||,ABS,in|
|00004800| 74 2c 49 4e 54 0d 17 52 | 09 dc 20 23 2c 23 0d 17 |t,INT..R|.. #,#..|
|00004810| 5c 05 3a 0d 17 66 14 dd | a4 72 65 70 6c 61 63 65 |\.:..f..|.replace|
|00004820| 28 62 24 2c 63 24 29 0d | 17 70 07 ea 20 78 0d 17 |(b$,c$).|.p.. x..|
|00004830| 7a 0d 78 3d a7 61 24 2c | 62 24 29 0d 17 84 2c e7 |z.x=.a$,|b$)...,.|
|00004840| 20 78 3e 30 20 61 24 3d | c0 61 24 2c 78 2d 31 29 | x>0 a$=|.a$,x-1)|
|00004850| 2b 63 24 2b c1 61 24 2c | 78 2b a9 62 24 29 3a 3d |+c$+.a$,|x+.b$):=|
|00004860| 30 20 8b 20 3d 2d 31 0d | 17 8e 05 3a 0d 17 98 11 |0 . =-1.|...:....|
|00004870| dd a4 61 6c 67 65 62 72 | 61 28 61 24 29 0d 17 a2 |..algebr|a(a$)...|
|00004880| 07 ea 20 78 0d 17 ac 05 | f5 0d 17 b6 0b 66 6c 61 |.. x....|.....fla|
|00004890| 67 25 3d a3 0d 17 c0 0f | e3 20 78 3d 31 20 b8 20 |g%=.....|. x=1 . |
|000048a0| a9 61 24 0d 17 ca 0f 62 | 24 3d c1 61 24 2c 78 2c |.a$....b|$=.a$,x,|
|000048b0| 31 29 0d 17 d4 31 e7 20 | 62 24 3d 22 5e 22 20 80 |1)...1. |b$="^" .|
|000048c0| 20 66 6c 61 67 25 3d a3 | 20 8c 20 66 6c 61 67 25 | flag%=.| . flag%|
|000048d0| 3d b9 3a 61 24 3d a4 70 | 6f 77 65 72 73 28 78 2c |=.:a$=.p|owers(x,|
|000048e0| 61 24 29 0d 17 de 05 ed | 0d 17 e8 0d fd 20 66 6c |a$).....|..... fl|
|000048f0| 61 67 25 3d a3 0d 17 f2 | 1e f5 20 fd 20 a4 72 65 |ag%=....|.. . .re|
|00004900| 70 6c 61 63 65 28 22 73 | 71 72 22 2c bd 28 73 71 |place("s|qr",.(sq|
|00004910| 72 29 29 0d 17 fc 38 f5 | 20 fd 20 a4 72 65 70 6c |r))...8.| . .repl|
|00004920| 61 63 65 28 22 69 6e 76 | 73 69 6e 22 2c 22 73 69 |ace("inv|sin","si|
|00004930| 6e 22 2b bd 28 6e 65 67 | 5f 70 6f 77 65 72 29 2b |n"+.(neg|_power)+|
|00004940| bd 28 31 2b 70 6f 77 65 | 72 29 29 0d 18 06 07 3d |.(1+powe|r))....=|
|00004950| 61 24 0d 18 10 05 3a 0d | 18 1a 12 dd a4 70 6f 77 |a$....:.|.....pow|
|00004960| 65 72 73 28 78 2c 61 24 | 29 0d 18 24 0a ea 20 62 |ers(x,a$|)..$.. b|
|00004970| 24 2c 6e 0d 18 2e 09 78 | 3d 78 2b 31 0d 18 38 11 |$,n....x|=x+1..8.|
|00004980| f5 3a 62 24 3d c1 61 24 | 2c 78 2c 31 29 0d 18 42 |.:b$=.a$|,x,1)..B|
|00004990| 1f 6e 3d a7 22 30 31 32 | 33 34 35 36 37 38 39 61 |.n=."012|3456789a|
|000049a0| 62 63 6d 6e 70 71 78 22 | 2c 62 24 29 0d 18 4c 34 |bcmnpqx"|,b$)..L4|
|000049b0| e7 20 6e 3e 30 20 80 20 | 62 24 3c 3e 22 22 20 61 |. n>0 . |b$<>"" a|
|000049c0| 24 3d c0 61 24 2c 78 2d | 31 29 2b bd 28 6e 2b 70 |$=.a$,x-|1)+.(n+p|
|000049d0| 6f 77 65 72 2d 31 29 2b | c1 61 24 2c 78 2b 31 29 |ower-1)+|.a$,x+1)|
|000049e0| 0d 18 56 17 78 3d 78 2b | 31 3a fd 20 6e 3d 30 20 |..V.x=x+|1:. n=0 |
|000049f0| 84 20 62 24 3d 22 22 0d | 18 60 0e 6e 3d a7 61 24 |. b$="".|.`.n=.a$|
|00004a00| 2c 22 5e 22 29 0d 18 6a | 18 61 24 3d c0 61 24 2c |,"^")..j|.a$=.a$,|
|00004a10| 6e 2d 31 29 2b c1 61 24 | 2c 6e 2b 31 29 0d 18 74 |n-1)+.a$|,n+1)..t|
|00004a20| 07 3d 61 24 0d 18 7e 05 | 3a 0d 18 88 0f dd f2 64 |.=a$..~.|:......d|
|00004a30| 65 6c 65 74 65 28 6e 29 | 0d 18 92 45 66 75 6e 63 |elete(n)|...Efunc|
|00004a40| 24 28 6e 29 3d 22 22 3a | 78 6d 69 6e 28 6e 29 3d |$(n)="":|xmin(n)=|
|00004a50| 30 3a 78 6d 61 78 28 6e | 29 3d 30 3a 79 6d 69 6e |0:xmax(n|)=0:ymin|
|00004a60| 28 6e 29 3d 30 3a 79 6d | 61 78 28 6e 29 3d 30 3a |(n)=0:ym|ax(n)=0:|
|00004a70| 62 61 73 69 63 76 24 28 | 6e 29 3d 22 22 0d 18 9c |basicv$(|n)=""...|
|00004a80| 19 66 75 6e 63 74 69 6f | 6e 25 3d 66 75 6e 63 74 |.functio|n%=funct|
|00004a90| 69 6f 6e 25 2d 31 0d 18 | a6 0c e7 20 6e 3d 31 30 |ion%-1..|... n=10|
|00004aa0| 20 e1 0d 18 b0 0d e3 20 | 78 3d 6e 20 b8 20 39 0d | ...... |x=n . 9.|
|00004ab0| 18 ba 3b 66 75 6e 63 24 | 28 78 29 3d 66 75 6e 63 |..;func$|(x)=func|
|00004ac0| 24 28 78 2b 31 29 3a 78 | 6d 69 6e 28 78 29 3d 78 |$(x+1):x|min(x)=x|
|00004ad0| 6d 69 6e 28 78 2b 31 29 | 3a 78 6d 61 78 28 78 29 |min(x+1)|:xmax(x)|
|00004ae0| 3d 78 6d 61 78 28 78 2b | 31 29 0d 18 c4 3f 79 6d |=xmax(x+|1)...?ym|
|00004af0| 69 6e 28 78 29 3d 79 6d | 69 6e 28 78 2b 31 29 3a |in(x)=ym|in(x+1):|
|00004b00| 79 6d 61 78 28 78 29 3d | 79 6d 61 78 28 78 2b 31 |ymax(x)=|ymax(x+1|
|00004b10| 29 3a 62 61 73 69 63 76 | 24 28 78 29 3d 62 61 73 |):basicv|$(x)=bas|
|00004b20| 69 63 76 24 28 78 2b 31 | 29 0d 18 ce 05 ed 0d 18 |icv$(x+1|).......|
|00004b30| d8 4b 66 75 6e 63 24 28 | 31 30 29 3d 22 22 3a 78 |.Kfunc$(|10)="":x|
|00004b40| 6d 69 6e 28 31 30 29 3d | 30 3a 78 6d 61 78 28 31 |min(10)=|0:xmax(1|
|00004b50| 30 29 3d 30 3a 79 6d 69 | 6e 28 31 30 29 3d 30 3a |0)=0:ymi|n(10)=0:|
|00004b60| 79 6d 61 78 28 31 30 29 | 3d 30 3a 62 61 73 69 63 |ymax(10)|=0:basic|
|00004b70| 76 24 28 31 30 29 3d 22 | 22 0d 18 e2 05 e1 0d 18 |v$(10)="|".......|
|00004b80| ec 05 3a 0d 18 f6 17 dd | a4 72 61 64 69 61 6e 73 |..:.....|.radians|
|00004b90| 5f 6f 6e 5f 6f 66 66 28 | 6e 29 0d 19 00 23 e7 20 |_on_off(|n)...#. |
|00004ba0| 6e 3d b9 20 8c 20 3d 22 | 52 61 64 69 61 6e 73 22 |n=. . ="|Radians"|
|00004bb0| 20 8b 20 3d 22 44 65 67 | 72 65 65 73 22 0d 19 0a | . ="Deg|rees"...|
|00004bc0| 05 3a 0d 19 14 10 dd f2 | 63 68 61 72 61 63 74 65 |.:......|characte|
|00004bd0| 72 73 0d 19 1e 20 ef 32 | 33 2c 32 32 34 2c 32 34 |rs... .2|3,224,24|
|00004be0| 2c 33 36 2c 33 36 2c 33 | 36 2c 32 34 2c 30 2c 30 |,36,36,3|6,24,0,0|
|00004bf0| 2c 30 0d 19 28 20 ef 32 | 33 2c 32 32 35 2c 31 36 |,0..( .2|3,225,16|
|00004c00| 2c 34 38 2c 31 36 2c 31 | 36 2c 35 36 2c 30 2c 30 |,48,16,1|6,56,0,0|
|00004c10| 2c 30 0d 19 32 1f ef 32 | 33 2c 32 32 36 2c 32 34 |,0..2..2|3,226,24|
|00004c20| 2c 33 36 2c 38 2c 31 36 | 2c 36 30 2c 30 2c 30 2c |,36,8,16|,60,0,0,|
|00004c30| 30 0d 19 3c 1f ef 32 33 | 2c 32 32 37 2c 32 34 2c |0..<..23|,227,24,|
|00004c40| 33 36 2c 38 2c 33 36 2c | 32 34 2c 30 2c 30 2c 30 |36,8,36,|24,0,0,0|
|00004c50| 0d 19 46 1f ef 32 33 2c | 32 32 38 2c 38 2c 32 34 |..F..23,|228,8,24|
|00004c60| 2c 34 30 2c 31 32 34 2c | 38 2c 30 2c 30 2c 30 0d |,40,124,|8,0,0,0.|
|00004c70| 19 50 1f ef 32 33 2c 32 | 32 39 2c 36 30 2c 33 32 |.P..23,2|29,60,32|
|00004c80| 2c 35 36 2c 34 2c 35 36 | 2c 30 2c 30 2c 30 0d 19 |,56,4,56|,0,0,0..|
|00004c90| 5a 20 ef 32 33 2c 32 33 | 30 2c 32 38 2c 33 32 2c |Z .23,23|0,28,32,|
|00004ca0| 35 36 2c 33 36 2c 32 34 | 2c 30 2c 30 2c 30 0d 19 |56,36,24|,0,0,0..|
|00004cb0| 64 1e ef 32 33 2c 32 33 | 31 2c 36 30 2c 34 2c 38 |d..23,23|1,60,4,8|
|00004cc0| 2c 31 36 2c 31 36 2c 30 | 2c 30 2c 30 0d 19 6e 20 |,16,16,0|,0,0..n |
|00004cd0| ef 32 33 2c 32 33 32 2c | 32 34 2c 33 36 2c 32 34 |.23,232,|24,36,24|
|00004ce0| 2c 33 36 2c 32 34 2c 30 | 2c 30 2c 30 0d 19 78 1f |,36,24,0|,0,0..x.|
|00004cf0| ef 32 33 2c 32 33 33 2c | 32 34 2c 33 36 2c 32 38 |.23,233,|24,36,28|
|00004d00| 2c 34 2c 32 34 2c 30 2c | 30 2c 30 0d 19 82 20 ef |,4,24,0,|0,0... .|
|00004d10| 32 33 2c 32 33 34 2c 36 | 30 2c 36 2c 36 32 2c 31 |23,234,6|0,6,62,1|
|00004d20| 30 32 2c 36 32 2c 30 2c | 30 2c 30 0d 19 8c 23 ef |02,62,0,|0,0...#.|
|00004d30| 32 33 2c 32 33 35 2c 39 | 36 2c 39 36 2c 31 32 34 |23,235,9|6,96,124|
|00004d40| 2c 31 30 32 2c 31 32 34 | 2c 30 2c 30 2c 30 0d 19 |,102,124|,0,0,0..|
|00004d50| 96 20 ef 32 33 2c 32 33 | 36 2c 32 38 2c 35 34 2c |. .23,23|6,28,54,|
|00004d60| 34 38 2c 35 34 2c 32 38 | 2c 30 2c 30 2c 30 0d 19 |48,54,28|,0,0,0..|
|00004d70| a0 21 ef 32 33 2c 32 33 | 37 2c 35 34 2c 31 30 37 |.!.23,23|7,54,107|
|00004d80| 2c 31 30 37 2c 39 39 2c | 30 2c 30 2c 30 2c 30 0d |,107,99,|0,0,0,0.|
|00004d90| 19 aa 23 ef 32 33 2c 32 | 33 38 2c 31 32 34 2c 31 |..#.23,2|38,124,1|
|00004da0| 30 32 2c 31 30 32 2c 31 | 30 32 2c 30 2c 30 2c 30 |02,102,1|02,0,0,0|
|00004db0| 2c 30 0d 19 b4 23 ef 32 | 33 2c 32 33 39 2c 31 32 |,0...#.2|3,239,12|
|00004dc0| 34 2c 31 30 32 2c 31 32 | 34 2c 39 36 2c 39 36 2c |4,102,12|4,96,96,|
|00004dd0| 30 2c 30 2c 30 0d 19 be | 1f ef 32 33 2c 32 34 30 |0,0,0...|..23,240|
|00004de0| 2c 36 32 2c 31 30 32 2c | 36 32 2c 36 2c 37 2c 30 |,62,102,|62,6,7,0|
|00004df0| 2c 30 2c 30 0d 19 c8 21 | ef 32 33 2c 32 34 31 2c |,0,0...!|.23,241,|
|00004e00| 31 30 32 2c 32 34 2c 32 | 34 2c 31 30 32 2c 30 2c |102,24,2|4,102,0,|
|00004e10| 30 2c 30 2c 30 0d 19 d2 | 23 ef 32 33 2c 32 34 32 |0,0,0...|#.23,242|
|00004e20| 2c 33 31 2c 31 36 2c 31 | 36 2c 31 36 2c 31 36 2c |,31,16,1|6,16,16,|
|00004e30| 38 30 2c 31 37 36 2c 30 | 0d 19 dc 23 ef 32 33 2c |80,176,0|...#.23,|
|00004e40| 32 34 33 2c 30 2c 30 2c | 31 31 38 2c 31 33 36 2c |243,0,0,|118,136,|
|00004e50| 31 33 36 2c 31 31 38 2c | 30 2c 30 0d 19 e6 2b ef |136,118,|0,0...+.|
|00004e60| 32 33 2c 32 34 34 2c 32 | 34 38 2c 32 30 34 2c 32 |23,244,2|48,204,2|
|00004e70| 30 34 2c 32 31 36 2c 31 | 39 38 2c 31 39 38 2c 32 |04,216,1|98,198,2|
|00004e80| 32 30 2c 31 39 32 0d 19 | f0 22 ef 32 33 2c 32 34 |20,192..|.".23,24|
|00004e90| 35 2c 30 2c 31 34 2c 32 | 37 2c 32 34 2c 32 34 2c |5,0,14,2|7,24,24,|
|00004ea0| 32 34 2c 32 34 2c 32 34 | 0d 19 fa 22 ef 32 33 2c |24,24,24|...".23,|
|00004eb0| 32 34 36 2c 32 34 2c 32 | 34 2c 32 34 2c 32 31 36 |246,24,2|4,24,216|
|00004ec0| 2c 31 31 32 2c 30 2c 30 | 2c 30 0d 1a 04 27 ef 32 |,112,0,0|,0...'.2|
|00004ed0| 33 2c 32 34 37 2c 32 35 | 35 2c 31 39 32 2c 39 36 |3,247,25|5,192,96|
|00004ee0| 2c 34 38 2c 34 38 2c 39 | 36 2c 31 39 32 2c 32 35 |,48,48,9|6,192,25|
|00004ef0| 35 0d 1a 0e 21 ef 32 33 | 2c 32 34 38 2c 30 2c 32 |5...!.23|,248,0,2|
|00004f00| 34 2c 31 32 36 2c 32 34 | 2c 30 2c 31 32 36 2c 30 |4,126,24|,0,126,0|
|00004f10| 2c 30 0d 1a 18 22 ef 32 | 33 2c 32 34 39 2c 30 2c |,0...".2|3,249,0,|
|00004f20| 36 30 2c 31 30 32 2c 36 | 2c 36 30 2c 31 30 32 2c |60,102,6|,60,102,|
|00004f30| 36 30 2c 30 0d 1a 22 1d | ef 32 33 2c 32 35 30 2c |60,0..".|.23,250,|
|00004f40| 30 2c 30 2c 36 2c 32 35 | 35 2c 36 2c 30 2c 30 2c |0,0,6,25|5,6,0,0,|
|00004f50| 30 0d 1a 2c 24 ef 32 33 | 2c 32 35 31 2c 31 32 37 |0..,$.23|,251,127|
|00004f60| 2c 39 36 2c 39 36 2c 39 | 36 2c 39 36 2c 39 36 2c |,96,96,9|6,96,96,|
|00004f70| 39 36 2c 39 36 0d 1a 36 | 24 ef 32 33 2c 32 35 32 |96,96..6|$.23,252|
|00004f80| 2c 39 36 2c 39 36 2c 39 | 36 2c 39 36 2c 39 36 2c |,96,96,9|6,96,96,|
|00004f90| 39 36 2c 39 36 2c 31 32 | 37 0d 1a 40 1d ef 32 33 |96,96,12|7..@..23|
|00004fa0| 2c 32 35 33 2c 32 35 34 | 2c 36 2c 36 2c 36 2c 36 |,253,254|,6,6,6,6|
|00004fb0| 2c 36 2c 36 2c 36 0d 1a | 4a 1d ef 32 33 2c 32 35 |,6,6,6..|J..23,25|
|00004fc0| 34 2c 36 2c 36 2c 36 2c | 36 2c 36 2c 36 2c 36 2c |4,6,6,6,|6,6,6,6,|
|00004fd0| 32 35 34 0d 1a 54 1c ef | 32 33 2c 32 35 35 2c 30 |254..T..|23,255,0|
|00004fe0| 2c 30 2c 36 30 2c 30 2c | 30 2c 30 2c 30 2c 30 0d |,0,60,0,|0,0,0,0.|
|00004ff0| 1a 5e 40 73 71 72 3d 32 | 34 32 3a 61 6c 70 68 61 |.^@sqr=2|42:alpha|
|00005000| 3d 32 34 33 3a 62 65 74 | 61 3d 32 34 34 3a 69 6e |=243:bet|a=244:in|
|00005010| 74 5f 74 6f 70 3d 32 34 | 35 3a 69 6e 74 5f 62 6f |t_top=24|5:int_bo|
|00005020| 74 3d 32 34 36 3a 73 69 | 67 6d 61 3d 32 34 37 0d |t=246:si|gma=247.|
|00005030| 1a 68 38 70 6c 75 73 5f | 6d 69 6e 75 73 3d 32 34 |.h8plus_|minus=24|
|00005040| 38 3a 64 65 6c 74 61 3d | 32 34 39 3a 74 65 6e 64 |8:delta=|249:tend|
|00005050| 73 3d 32 35 30 3a 74 6f | 70 31 3d 32 35 31 3a 62 |s=250:to|p1=251:b|
|00005060| 6f 74 31 3d 32 35 32 0d | 1a 72 2d 74 6f 70 32 3d |ot1=252.|.r-top2=|
|00005070| 32 35 33 3a 62 6f 74 32 | 3d 32 35 34 3a 70 6f 77 |253:bot2|=254:pow|
|00005080| 65 72 3d 32 32 34 3a 6e | 65 67 5f 70 6f 77 65 72 |er=224:n|eg_power|
|00005090| 3d 32 35 35 0d 1a 7c 05 | e1 0d 1a 86 05 3a 0d 1a |=255..|.|.....:..|
|000050a0| 90 10 dd f2 71 75 61 64 | 72 61 74 69 63 73 0d 1a |....quad|ratics..|
|000050b0| 9a 10 db 3a ef 31 39 2c | 30 2c 34 3b 30 3b 0d 1a |...:.19,|0,4;0;..|
|000050c0| a4 36 f1 20 8a 30 2c 34 | 29 a4 63 65 6e 74 72 65 |.6. .0,4|).centre|
|000050d0| 28 22 51 20 55 20 41 20 | 44 20 52 20 41 20 54 20 |("Q U A |D R A T |
|000050e0| 49 20 43 20 20 20 20 53 | 20 4f 20 4c 20 56 20 45 |I C S| O L V E|
|000050f0| 20 52 22 29 0d 1a ae 0a | f2 74 69 74 6c 65 0d 1a | R")....|.title..|
|00005100| b8 11 ef 32 38 2c 32 2c | 33 30 2c 37 36 2c 36 0d |...28,2,|30,76,6.|
|00005110| 1a c2 54 f1 22 45 6e 74 | 65 72 20 74 68 65 20 66 |..T."Ent|er the f|
|00005120| 6f 6c 6c 6f 77 69 6e 67 | 20 64 65 74 61 69 6c 73 |ollowing| details|
|00005130| 20 61 62 6f 75 74 20 74 | 68 65 20 71 75 61 64 72 | about t|he quadr|
|00005140| 61 74 69 63 20 69 6e 20 | 74 68 65 20 66 6f 72 6d |atic in |the form|
|00005150| 20 79 3d 61 78 22 3b bd | 32 32 36 3b 22 2b 62 78 | y=ax";.|226;"+bx|
|00005160| 2b 63 22 0d 1a cc 1d f1 | 27 22 43 6f 65 66 66 20 |+c".....|'"Coeff |
|00005170| 6f 66 20 78 22 3b bd 32 | 32 36 3b 22 3a 20 22 3b |of x";.2|26;": ";|
|00005180| 0d 1a d6 0b e8 20 22 61 | 3d 22 61 0d 1a e0 0f e7 |..... "a|="a.....|
|00005190| 20 61 3d 30 20 ef 32 36 | 3a e1 0d 1a ea 16 f1 20 | a=0 .26|:...... |
|000051a0| 22 43 6f 65 66 66 20 6f | 66 20 78 20 3a 20 22 3b |"Coeff o|f x : ";|
|000051b0| 0d 1a f4 0b e8 20 22 62 | 3d 22 62 0d 1a fe 16 f1 |..... "b|="b.....|
|000051c0| 20 22 43 6f 6e 73 74 61 | 6e 74 20 20 20 3a 20 22 | "Consta|nt : "|
|000051d0| 3b 0d 1b 08 0b e8 20 22 | 63 3d 22 63 0d 1b 12 1d |;..... "|c="c....|
|000051e0| db 3a f1 22 59 6f 75 72 | 20 65 71 75 61 74 69 6f |.:."Your| equatio|
|000051f0| 6e 20 69 73 20 79 3d 22 | 3b 0d 1b 1c 1e e7 20 61 |n is y="|;..... a|
|00005200| 3d 2d 31 20 f1 22 2d 22 | 3b 20 8b 20 e7 20 61 3c |=-1 ."-"|; . . a<|
|00005210| 3e 31 20 f1 20 61 3b 0d | 1b 26 0f f1 20 22 78 22 |>1 . a;.|.&.. "x"|
|00005220| 3b bd 32 32 36 3b 0d 1b | 30 1e e7 20 62 3d 2d 31 |;.226;..|0.. b=-1|
|00005230| 20 f1 22 2d 22 3b 20 8b | 20 e7 20 62 3e 30 20 f1 | ."-"; .| . b>0 .|
|00005240| 22 2b 22 3b 0d 1b 3a 33 | e7 20 62 3c 3e 30 20 80 |"+";..:3|. b<>0 .|
|00005250| 20 62 3c 3e 31 20 80 20 | 62 3c 3e 2d 31 20 f1 22 | b<>1 . |b<>-1 ."|
|00005260| 22 3b 62 3b 22 78 22 3b | 20 8b 20 e7 20 62 3c 3e |";b;"x";| . . b<>|
|00005270| 30 20 f1 22 78 22 3b 0d | 1b 44 0f e7 20 63 3e 30 |0 ."x";.|.D.. c>0|
|00005280| 20 f1 22 2b 22 3b 0d 1b | 4e 14 e7 20 63 3d 30 20 | ."+";..|N.. c=0 |
|00005290| f1 20 8b 20 f1 20 22 22 | 3b 63 0d 1b 58 34 f1 8a |. . . ""|;c..X4..|
|000052a0| 30 2c 31 29 22 54 68 65 | 20 72 6f 6f 74 73 20 6f |0,1)"The| roots o|
|000052b0| 66 20 61 6e 79 20 71 75 | 61 64 72 61 74 69 63 20 |f any qu|adratic |
|000052c0| 61 72 65 20 67 69 76 65 | 6e 20 62 79 3a 22 0d 1b |are give|n by:"..|
|000052d0| 62 3f f1 8a 34 38 2c 31 | 29 22 78 20 3d 20 2d 62 |b?..48,1|)"x = -b|
|000052e0| 20 22 3b bd 28 70 6c 75 | 73 5f 6d 69 6e 75 73 29 | ";.(plu|s_minus)|
|000052f0| 3b 22 20 22 3b bd 28 73 | 71 72 29 3b 22 7b 62 22 |;" ";.(s|qr);"{b"|
|00005300| 3b bd 32 32 36 3b 22 2d | 34 61 63 7d 22 0d 1b 6c |;.226;"-|4ac}"..l|
|00005310| 23 f2 67 72 61 70 68 69 | 63 5f 70 72 69 6e 74 28 |#.graphi|c_print(|
|00005320| 35 33 2c 31 2b 36 2c c4 | 31 34 2c 22 5f 22 29 29 |53,1+6,.|14,"_"))|
|00005330| 0d 1b 76 0f f1 8a 35 36 | 2c 32 29 22 32 61 22 0d |..v...56|,2)"2a".|
|00005340| 1b 80 0f 64 3d 62 5e 32 | 2d 34 2a 61 2a 63 0d 1b |...d=b^2|-4*a*c..|
|00005350| 8a 36 e7 20 64 3e 3d 30 | 20 72 6f 6f 74 31 3d 28 |.6. d>=0| root1=(|
|00005360| 2d 62 2d b6 28 64 29 29 | 2f 28 32 2a 61 29 3a 72 |-b-.(d))|/(2*a):r|
|00005370| 6f 6f 74 32 3d 28 2d 62 | 2b b6 28 64 29 29 2f 28 |oot2=(-b|+.(d))/(|
|00005380| 32 2a 61 29 0d 1b 94 32 | e7 20 64 3c 30 20 f1 8a |2*a)...2|. d<0 ..|
|00005390| 30 2c 33 29 22 54 68 69 | 73 20 65 71 75 61 74 69 |0,3)"Thi|s equati|
|000053a0| 6f 6e 20 68 61 73 20 63 | 6f 6d 70 6c 65 78 20 72 |on has c|omplex r|
|000053b0| 6f 6f 74 73 2e 22 0d 1b | 9e 41 e7 20 64 3d 30 20 |oots."..|.A. d=0 |
|000053c0| f1 8a 30 2c 33 29 22 78 | 3d 22 3b 72 6f 6f 74 31 |..0,3)"x|=";root1|
|000053d0| 3b 22 20 74 77 69 63 65 | 2e 20 28 69 65 2e 20 49 |;" twice|. (ie. I|
|000053e0| 74 20 69 73 20 61 20 70 | 65 72 66 65 63 74 20 73 |t is a p|erfect s|
|000053f0| 71 75 61 72 65 29 22 0d | 1b a8 27 e7 20 64 3e 30 |quare)".|..'. d>0|
|00005400| 20 f1 8a 30 2c 33 29 22 | 78 3d 22 3b 72 6f 6f 74 | ..0,3)"|x=";root|
|00005410| 31 3b 22 20 6f 72 20 22 | 3b 72 6f 6f 74 32 0d 1b |1;" or "|;root2..|
|00005420| b2 4a f1 8a 30 2c 35 29 | 22 54 68 65 20 73 75 6d |.J..0,5)|"The sum|
|00005430| 20 6f 66 20 74 68 65 20 | 72 6f 6f 74 73 20 22 3b | of the |roots ";|
|00005440| bd 28 61 6c 70 68 61 29 | 3b 22 2b 22 3b bd 28 62 |.(alpha)|;"+";.(b|
|00005450| 65 74 61 29 3b 22 20 69 | 73 20 67 69 76 65 6e 20 |eta);" i|s given |
|00005460| 62 79 20 2d 62 2f 61 22 | 0d 1b bc 49 f1 8a 30 2c |by -b/a"|...I..0,|
|00005470| 36 29 22 54 68 65 20 70 | 72 6f 64 75 63 74 20 6f |6)"The p|roduct o|
|00005480| 66 20 74 68 65 20 72 6f | 6f 74 73 20 22 3b bd 28 |f the ro|ots ";.(|
|00005490| 61 6c 70 68 61 29 3b bd | 28 62 65 74 61 29 3b 22 |alpha);.|(beta);"|
|000054a0| 20 69 73 20 67 69 76 65 | 6e 20 62 79 20 63 2f 61 | is give|n by c/a|
|000054b0| 22 0d 1b c6 28 f1 8a 35 | 30 2c 35 29 bd 28 61 6c |"...(..5|0,5).(al|
|000054c0| 70 68 61 29 3b 22 2b 22 | 3b bd 28 62 65 74 61 29 |pha);"+"|;.(beta)|
|000054d0| 3b 22 3d 22 3b 2d 62 2f | 61 0d 1b d0 23 f1 8a 35 |;"=";-b/|a...#..5|
|000054e0| 31 2c 36 29 bd 28 61 6c | 70 68 61 29 3b bd 28 62 |1,6).(al|pha);.(b|
|000054f0| 65 74 61 29 3b 22 3d 22 | 3b 63 2f 61 0d 1b da 54 |eta);"="|;c/a...T|
|00005500| f1 8a 30 2c 38 29 22 54 | 68 65 20 65 71 75 61 74 |..0,8)"T|he equat|
|00005510| 69 6f 6e 20 6d 61 79 20 | 61 6c 73 6f 20 62 65 20 |ion may |also be |
|00005520| 65 78 70 72 65 73 73 65 | 64 20 69 6e 20 74 68 65 |expresse|d in the|
|00005530| 20 66 6f 72 6d 20 79 3d | 61 28 78 2d 70 29 2b 71 | form y=|a(x-p)+q|
|00005540| 20 77 68 65 72 65 20 28 | 70 2c 71 29 20 69 73 22 | where (|p,q) is"|
|00005550| 0d 1b e4 53 f1 8a 30 2c | 39 29 22 74 68 65 20 6d |...S..0,|9)"the m|
|00005560| 61 78 20 6f 72 20 6d 69 | 6e 20 70 6f 69 6e 74 2e |ax or mi|n point.|
|00005570| 20 54 68 65 72 65 66 6f | 72 65 20 78 3d 70 20 69 | Therefo|re x=p i|
|00005580| 73 20 74 68 65 20 6c 69 | 6e 65 20 6f 66 20 73 79 |s the li|ne of sy|
|00005590| 6d 65 74 72 79 20 6f 66 | 20 74 68 65 20 63 75 72 |metry of| the cur|
|000055a0| 76 65 22 0d 1b ee 28 f1 | 8a 30 2c 31 30 29 22 61 |ve"...(.|.0,10)"a|
|000055b0| 6e 64 20 71 20 74 68 65 | 20 6d 61 78 20 6f 72 20 |nd q the| max or |
|000055c0| 6d 69 6e 20 76 61 6c 75 | 65 2e 22 0d 1b f8 0e 70 |min valu|e."....p|
|000055d0| 3d 2d 62 2f 28 32 2a 61 | 29 0d 1c 02 17 71 3d 28 |=-b/(2*a|)....q=(|
|000055e0| 34 2a 61 2a 63 2d 62 5e | 32 29 2f 28 34 2a 61 29 |4*a*c-b^|2)/(4*a)|
|000055f0| 0d 1c 0c 10 f1 8a 35 2c | 31 31 29 22 79 3d 22 3b |......5,|11)"y=";|
|00005600| 0d 1c 16 0f e7 20 61 3c | 30 20 f1 22 2d 22 3b 0d |..... a<|0 ."-";.|
|00005610| 1c 20 19 e7 20 61 3c 3e | 31 20 80 20 61 3c 3e 2d |. .. a<>|1 . a<>-|
|00005620| 31 20 f1 22 22 3b 61 3b | 0d 1c 2a 0a f1 22 28 78 |1 ."";a;|..*.."(x|
|00005630| 22 3b 0d 1c 34 26 e7 20 | 70 3e 30 20 f1 22 2d 22 |";..4&. |p>0 ."-"|
|00005640| 3b 70 3b 20 8b 20 e7 20 | 70 3c 30 20 f1 22 2b 22 |;p; . . |p<0 ."+"|
|00005650| 3b b6 28 70 5e 32 29 3b | 0d 1c 3e 0e f1 22 29 22 |;.(p^2);|..>..")"|
|00005660| 3b bd 32 32 36 3b 0d 1c | 48 1e e7 20 71 3c 30 20 |;.226;..|H.. q<0 |
|00005670| f1 22 22 3b 71 20 8b 20 | e7 20 71 3e 30 20 f1 22 |."";q . |. q>0 ."|
|00005680| 2b 22 3b 71 0d 1c 52 0b | e7 20 71 3d 30 20 f1 0d |+";q..R.|. q=0 ..|
|00005690| 1c 5c 31 f1 8a 30 2c 32 | 39 29 20 a4 63 65 6e 74 |.\1..0,2|9) .cent|
|000056a0| 72 65 28 22 50 72 65 73 | 73 20 61 6e 79 20 6b 65 |re("Pres|s any ke|
|000056b0| 79 20 74 6f 20 63 6f 6e | 74 69 6e 75 65 22 29 3b |y to con|tinue");|
|000056c0| 0d 1c 66 14 f2 73 63 72 | 65 65 6e 5f 64 75 6d 70 |..f..scr|een_dump|
|000056d0| 3a ef 32 36 0d 1c 70 05 | e1 0d 1c 7a 05 3a 0d 1c |:.26..p.|...z.:..|
|000056e0| 84 1b dd f2 67 72 61 70 | 68 69 63 5f 70 72 69 6e |....grap|hic_prin|
|000056f0| 74 28 78 2c 79 2c 61 24 | 29 0d 1c 8e 06 ef 35 0d |t(x,y,a$|).....5.|
|00005700| 1c 98 3f e7 20 63 6f 6d | 70 75 74 65 72 24 3d 22 |..?. com|puter$="|
|00005710| 4e 49 4d 42 55 53 22 20 | ec 20 78 2a 31 36 2c 39 |NIMBUS" |. x*16,9|
|00005720| 39 31 2d 28 79 2a 33 32 | 29 20 8b 20 ec 20 78 2a |91-(y*32|) . . x*|
|00005730| 31 36 2c 31 30 32 33 2d | 28 79 2a 33 32 29 0d 1c |16,1023-|(y*32)..|
|00005740| a2 0b f1 20 61 24 3a ef | 34 0d 1c ac 05 e1 0d 1c |... a$:.|4.......|
|00005750| b6 05 3a 0d 1c c0 14 dd | f2 67 65 74 5f 79 5f 72 |..:.....|.get_y_r|
|00005760| 61 6e 67 65 28 6e 29 0d | 1c ca 09 ea 20 58 2c 59 |ange(n).|.... X,Y|
|00005770| 0d 1c d4 27 f1 20 27 27 | 22 52 61 6e 67 69 6e 67 |...'. ''|"Ranging|
|00005780| 20 66 6f 72 20 59 20 76 | 61 6c 75 65 73 2e 2e 2e | for Y v|alues...|
|00005790| 2e 2e 2e 2e 2e 2e 22 0d | 1c de 17 79 6d 61 78 28 |......".|...ymax(|
|000057a0| 6e 29 3d 30 3a 79 6d 69 | 6e 28 6e 29 3d 30 0d 1c |n)=0:ymi|n(n)=0..|
|000057b0| e8 35 e3 20 58 3d 78 6d | 69 6e 28 6e 29 20 b8 20 |.5. X=xm|in(n) . |
|000057c0| 78 6d 61 78 28 6e 29 20 | 88 20 28 78 6d 61 78 28 |xmax(n) |. (xmax(|
|000057d0| 6e 29 2d 78 6d 69 6e 28 | 6e 29 29 2f 70 6f 69 6e |n)-xmin(|n))/poin|
|000057e0| 74 73 25 0d 1c f2 13 59 | 3d a0 28 62 61 73 69 63 |ts%....Y|=.(basic|
|000057f0| 76 24 28 6e 29 29 0d 1c | fc 1b e7 20 59 3e 79 6d |v$(n))..|... Y>ym|
|00005800| 61 78 28 6e 29 20 8c 20 | 79 6d 61 78 28 6e 29 3d |ax(n) . |ymax(n)=|
|00005810| 59 0d 1d 06 1b e7 20 59 | 3c 79 6d 69 6e 28 6e 29 |Y..... Y|<ymin(n)|
|00005820| 20 8c 20 79 6d 69 6e 28 | 6e 29 3d 59 0d 1d 10 05 | . ymin(|n)=Y....|
|00005830| ed 0d 1d 1a 29 e7 20 a7 | 62 61 73 69 63 76 24 28 |....). .|basicv$(|
|00005840| 6e 29 2c 22 53 51 52 22 | 29 20 79 6d 69 6e 28 6e |n),"SQR"|) ymin(n|
|00005850| 29 3d 2d 79 6d 61 78 28 | 6e 29 0d 1d 24 05 e1 0d |)=-ymax(|n)..$...|
|00005860| 1d 2e 05 3a 0d 1d 38 0d | dd f2 70 6c 6f 74 61 6c |...:..8.|..plotal|
|00005870| 6c 0d 1d 42 10 db 3a ef | 31 39 2c 30 2c 34 3b 30 |l..B..:.|19,0,4;0|
|00005880| 3b 0d 1d 4c 37 78 6d 69 | 6e 3d 78 6d 69 6e 28 31 |;..L7xmi|n=xmin(1|
|00005890| 29 3a 78 6d 61 78 3d 78 | 6d 61 78 28 31 29 3a 79 |):xmax=x|max(1):y|
|000058a0| 6d 69 6e 3d 79 6d 69 6e | 28 31 29 3a 79 6d 61 78 |min=ymin|(1):ymax|
|000058b0| 3d 79 6d 61 78 28 31 29 | 0d 1d 56 15 e3 20 6e 3d |=ymax(1)|..V.. n=|
|000058c0| 31 20 b8 20 66 75 6e 63 | 74 69 6f 6e 25 0d 1d 60 |1 . func|tion%..`|
|000058d0| 0b 66 6c 61 67 25 3d a3 | 0d 1d 6a 2f e7 20 78 6d |.flag%=.|..j/. xm|
|000058e0| 69 6e 28 6e 29 3d 78 6d | 61 78 28 6e 29 20 84 20 |in(n)=xm|ax(n) . |
|000058f0| 79 6d 69 6e 28 6e 29 3d | 79 6d 61 78 28 6e 29 20 |ymin(n)=|ymax(n) |
|00005900| 66 6c 61 67 25 3d b9 0d | 1d 74 29 e7 20 78 6d 69 |flag%=..|.t). xmi|
|00005910| 6e 28 6e 29 3c 78 6d 69 | 6e 20 80 20 66 6c 61 67 |n(n)<xmi|n . flag|
|00005920| 25 3d a3 20 78 6d 69 6e | 3d 78 6d 69 6e 28 6e 29 |%=. xmin|=xmin(n)|
|00005930| 0d 1d 7e 29 e7 20 78 6d | 61 78 28 6e 29 3e 78 6d |..~). xm|ax(n)>xm|
|00005940| 61 78 20 80 20 66 6c 61 | 67 25 3d a3 20 78 6d 61 |ax . fla|g%=. xma|
|00005950| 78 3d 78 6d 61 78 28 6e | 29 0d 1d 88 29 e7 20 79 |x=xmax(n|)...). y|
|00005960| 6d 69 6e 28 6e 29 3c 79 | 6d 69 6e 20 80 20 66 6c |min(n)<y|min . fl|
|00005970| 61 67 25 3d a3 20 79 6d | 69 6e 3d 79 6d 69 6e 28 |ag%=. ym|in=ymin(|
|00005980| 6e 29 0d 1d 92 29 e7 20 | 79 6d 61 78 28 6e 29 3e |n)...). |ymax(n)>|
|00005990| 79 6d 61 78 20 80 20 66 | 6c 61 67 25 3d a3 20 79 |ymax . f|lag%=. y|
|000059a0| 6d 61 78 3d 79 6d 61 78 | 28 6e 29 0d 1d 9c 05 ed |max=ymax|(n).....|
|000059b0| 0d 1d a6 15 e3 20 6e 3d | 31 20 b8 20 66 75 6e 63 |..... n=|1 . func|
|000059c0| 74 69 6f 6e 25 0d 1d b0 | 0b 66 6c 61 67 25 3d a3 |tion%...|.flag%=.|
|000059d0| 0d 1d ba 2f e7 20 78 6d | 69 6e 28 6e 29 3d 78 6d |.../. xm|in(n)=xm|
|000059e0| 61 78 28 6e 29 20 84 20 | 79 6d 69 6e 28 6e 29 3d |ax(n) . |ymin(n)=|
|000059f0| 79 6d 61 78 28 6e 29 20 | 66 6c 61 67 25 3d b9 0d |ymax(n) |flag%=..|
|00005a00| 1d c4 2e e7 20 66 6c 61 | 67 25 3d a3 20 f2 70 6c |.... fla|g%=. .pl|
|00005a10| 6f 74 6c 69 6e 65 28 6e | 2c 78 6d 69 6e 2c 78 6d |otline(n|,xmin,xm|
|00005a20| 61 78 2c 79 6d 69 6e 2c | 79 6d 61 78 29 0d 1d ce |ax,ymin,|ymax)...|
|00005a30| 14 ed 3a d4 20 31 2c 2d | 31 35 2c 31 30 30 2c 31 |..:. 1,-|15,100,1|
|00005a40| 30 0d 1d d8 10 f2 73 63 | 72 65 65 6e 5f 64 75 6d |0.....sc|reen_dum|
|00005a50| 70 0d 1d e2 05 e1 0d 1d | ec 05 3a 0d 1d f6 0d dd |p.......|..:.....|
|00005a60| f2 70 6c 6f 74 28 6e 29 | 0d 1e 00 10 db 3a ef 31 |.plot(n)|.....:.1|
|00005a70| 39 2c 30 2c 34 3b 30 3b | 0d 1e 0a 29 e7 20 78 6d |9,0,4;0;|...). xm|
|00005a80| 69 6e 28 6e 29 3d 78 6d | 61 78 28 6e 29 20 84 20 |in(n)=xm|ax(n) . |
|00005a90| 79 6d 69 6e 28 6e 29 3d | 79 6d 61 78 28 6e 29 20 |ymin(n)=|ymax(n) |
|00005aa0| e1 0d 1e 14 30 f2 70 6c | 6f 74 6c 69 6e 65 28 6e |....0.pl|otline(n|
|00005ab0| 2c 78 6d 69 6e 28 6e 29 | 2c 78 6d 61 78 28 6e 29 |,xmin(n)|,xmax(n)|
|00005ac0| 2c 79 6d 69 6e 28 6e 29 | 2c 79 6d 61 78 28 6e 29 |,ymin(n)|,ymax(n)|
|00005ad0| 29 0d 1e 1e 1e d4 20 31 | 2c 2d 31 35 2c 31 30 30 |)..... 1|,-15,100|
|00005ae0| 2c 31 30 3a 73 63 72 65 | 65 6e 5f 64 75 6d 70 0d |,10:scre|en_dump.|
|00005af0| 1e 28 05 e1 0d 1e 32 05 | 3a 0d 1e 3c 11 dd f2 69 |.(....2.|:..<...i|
|00005b00| 6e 63 5f 70 6c 6f 74 28 | 6e 29 0d 1e 46 10 db 3a |nc_plot(|n)..F..:|
|00005b10| ef 31 39 2c 30 2c 34 3b | 30 3b 0d 1e 50 22 f1 22 |.19,0,4;|0;..P"."|
|00005b20| 57 68 69 63 68 20 76 61 | 72 69 61 62 6c 65 3a 20 |Which va|riable: |
|00005b30| 22 3b 3a 61 24 3d be 3a | f1 20 61 24 0d 1e 5a 2b |";:a$=.:|. a$..Z+|
|00005b40| e7 20 a7 22 41 42 43 44 | 45 46 47 48 49 4a 4b 4c |. ."ABCD|EFGHIJKL|
|00005b50| 4d 4e 4f 50 51 52 53 54 | 55 56 57 58 59 5a 22 2c |MNOPQRST|UVWXYZ",|
|00005b60| 61 24 29 3d 30 20 e1 0d | 1e 64 16 e8 22 53 74 61 |a$)=0 ..|.d.."Sta|
|00005b70| 72 74 20 61 74 3a 20 22 | 73 74 61 72 74 0d 1e 6e |rt at: "|start..n|
|00005b80| 1d e8 22 4e 75 6d 62 65 | 72 20 6f 66 20 70 6c 6f |.."Numbe|r of plo|
|00005b90| 74 73 3a 20 22 70 6c 6f | 74 73 0d 1e 78 15 e8 22 |ts: "plo|ts..x.."|
|00005ba0| 49 6e 63 72 65 6d 65 6e | 74 3a 20 22 69 6e 63 0d |Incremen|t: "inc.|
|00005bb0| 1e 82 11 79 6d 61 78 3d | 30 3a 79 6d 69 6e 3d 30 |...ymax=|0:ymin=0|
|00005bc0| 0d 1e 8c 25 e3 20 61 3d | 73 74 61 72 74 20 b8 20 |...%. a=|start . |
|00005bd0| 73 74 61 72 74 2b 70 6c | 6f 74 73 2a 69 6e 63 20 |start+pl|ots*inc |
|00005be0| 88 20 69 6e 63 0d 1e 96 | 17 f2 73 65 74 5f 76 61 |. inc...|..set_va|
|00005bf0| 72 69 61 62 6c 65 28 61 | 24 2c 61 29 0d 1e a0 13 |riable(a|$,a)....|
|00005c00| f2 67 65 74 5f 79 5f 72 | 61 6e 67 65 28 6e 29 0d |.get_y_r|ange(n).|
|00005c10| 1e aa 1f e7 20 79 6d 61 | 78 28 6e 29 3e 79 6d 61 |.... yma|x(n)>yma|
|00005c20| 78 20 79 6d 61 78 3d 79 | 6d 61 78 28 6e 29 0d 1e |x ymax=y|max(n)..|
|00005c30| b4 1f e7 20 79 6d 69 6e | 28 6e 29 3c 79 6d 69 6e |... ymin|(n)<ymin|
|00005c40| 20 79 6d 69 6e 3d 79 6d | 69 6e 28 6e 29 0d 1e be | ymin=ym|in(n)...|
|00005c50| 05 ed 0d 1e c8 05 db 0d | 1e d2 25 e3 20 61 3d 73 |........|..%. a=s|
|00005c60| 74 61 72 74 20 b8 20 73 | 74 61 72 74 2b 70 6c 6f |tart . s|tart+plo|
|00005c70| 74 73 2a 69 6e 63 20 88 | 20 69 6e 63 0d 1e dc 17 |ts*inc .| inc....|
|00005c80| f2 73 65 74 5f 76 61 72 | 69 61 62 6c 65 28 61 24 |.set_var|iable(a$|
|00005c90| 2c 61 29 0d 1e e6 2a f2 | 70 6c 6f 74 6c 69 6e 65 |,a)...*.|plotline|
|00005ca0| 28 6e 2c 78 6d 69 6e 28 | 6e 29 2c 78 6d 61 78 28 |(n,xmin(|n),xmax(|
|00005cb0| 6e 29 2c 79 6d 69 6e 2c | 79 6d 61 78 29 0d 1e f0 |n),ymin,|ymax)...|
|00005cc0| 05 ed 0d 1e fa 13 ef 37 | 3a f2 73 63 72 65 65 6e |.......7|:.screen|
|00005cd0| 5f 64 75 6d 70 0d 1f 04 | 05 e1 0d 1f 0e 05 3a 0d |_dump...|......:.|
|00005ce0| 1f 18 25 dd f2 70 6c 6f | 74 6c 69 6e 65 28 6e 2c |..%..plo|tline(n,|
|00005cf0| 6d 69 6e 58 2c 6d 61 78 | 58 2c 6d 69 6e 59 2c 6d |minX,max|X,minY,m|
|00005d00| 61 78 59 29 0d 1f 22 07 | ef 32 36 0d 1f 2c 13 53 |axY)..".|.26..,.S|
|00005d10| 71 72 25 3d 30 3a 53 71 | 72 6c 70 25 3d 30 0d 1f |qr%=0:Sq|rlp%=0..|
|00005d20| 36 20 e7 20 a7 62 61 73 | 69 63 76 24 28 6e 29 2c |6 . .bas|icv$(n),|
|00005d30| 22 53 51 52 22 29 20 53 | 71 72 25 3d 2d 31 0d 1f |"SQR") S|qr%=-1..|
|00005d40| 40 1a 58 72 3d 6d 61 78 | 58 2d 6d 69 6e 58 3a 58 |@.Xr=max|X-minX:X|
|00005d50| 73 3d 39 30 30 2f 58 72 | 0d 1f 4a 1a 59 72 3d 6d |s=900/Xr|..J.Yr=m|
|00005d60| 61 78 59 2d 6d 69 6e 59 | 3a 59 73 3d 39 30 30 2f |axY-minY|:Ys=900/|
|00005d70| 59 72 0d 1f 54 0c 4f 78 | 3d 2d 6d 69 6e 58 0d 1f |Yr..T.Ox|=-minX..|
|00005d80| 5e 0c 4f 79 3d 2d 6d 69 | 6e 59 0d 1f 68 18 c8 91 |^.Oy=-mi|nY..h...|
|00005d90| 20 4f 78 2a 58 73 2b 35 | 30 2c 4f 79 2a 59 73 2b | Ox*Xs+5|0,Oy*Ys+|
|00005da0| 35 30 0d 1f 72 1b ec 20 | 30 2c 6d 69 6e 59 2a 59 |50..r.. |0,minY*Y|
|00005db0| 73 3a df 20 30 2c 6d 61 | 78 59 2a 59 73 0d 1f 7c |s:. 0,ma|xY*Ys..||
|00005dc0| 1b ec 20 6d 69 6e 58 2a | 58 73 2c 30 3a df 20 6d |.. minX*|Xs,0:. m|
|00005dd0| 61 78 58 2a 58 73 2c 30 | 0d 1f 86 3a e3 20 78 3d |axX*Xs,0|...:. x=|
|00005de0| 6d 69 6e 58 20 b8 20 6d | 61 78 58 20 88 20 a4 73 |minX . m|axX . .s|
|00005df0| 63 61 6c 65 28 6d 69 6e | 58 2c 6d 61 78 58 29 3a |cale(min|X,maxX):|
|00005e00| ec 20 78 2a 58 73 2c 35 | 3a df 78 2a 58 73 2c 30 |. x*Xs,5|:.x*Xs,0|
|00005e10| 3a ed 0d 1f 90 3b e3 20 | 79 3d 6d 69 6e 59 20 b8 |:....;. |y=minY .|
|00005e20| 20 6d 61 78 59 20 88 20 | a4 73 63 61 6c 65 28 6d | maxY . |.scale(m|
|00005e30| 69 6e 59 2c 6d 61 78 59 | 29 3a ec 20 35 2c 79 2a |inY,maxY|):. 5,y*|
|00005e40| 59 73 3a df 20 30 2c 79 | 2a 59 73 3a ed 0d 1f 9a |Ys:. 0,y|*Ys:....|
|00005e50| 1d ef 35 3a ec 20 2d 34 | 35 2c 6d 69 6e 59 2a 59 |..5:. -4|5,minY*Y|
|00005e60| 73 3a f1 22 22 3b 6d 69 | 6e 59 0d 1f a4 1b ec 20 |s:."";mi|nY..... |
|00005e70| 2d 34 35 2c 6d 61 78 59 | 2a 59 73 3a f1 20 22 22 |-45,maxY|*Ys:. ""|
|00005e80| 3b 6d 61 78 59 0d 1f ae | 1b ec 20 6d 69 6e 58 2a |;maxY...|.. minX*|
|00005e90| 58 73 2c 2d 31 30 3a f1 | 20 22 22 3b 6d 69 6e 58 |Xs,-10:.| "";minX|
|00005ea0| 0d 1f b8 1b ec 20 6d 61 | 78 58 2a 58 73 2c 2d 31 |..... ma|xX*Xs,-1|
|00005eb0| 30 3a f1 20 22 22 3b 6d | 61 78 58 0d 1f c2 38 ec |0:. "";m|axX...8.|
|00005ec0| 20 6d 61 78 58 2a 58 73 | 2b 31 30 2c 28 6d 61 78 | maxX*Xs|+10,(max|
|00005ed0| 59 2a 59 73 29 2d 28 6e | 2a 33 32 29 3a f1 20 22 |Y*Ys)-(n|*32):. "|
|00005ee0| 22 3b 6e 3b 22 2e 2e 79 | 3d 22 3b 66 75 6e 63 24 |";n;"..y|=";func$|
|00005ef0| 28 6e 29 0d 1f cc 2a ef | 34 2c 32 34 2c 6d 69 6e |(n)...*.|4,24,min|
|00005f00| 58 2a 58 73 3b 6d 69 6e | 59 2a 59 73 3b 6d 61 78 |X*Xs;min|Y*Ys;max|
|00005f10| 58 2a 58 73 3b 6d 61 78 | 59 2a 59 73 3b 0d 1f d6 |X*Xs;max|Y*Ys;...|
|00005f20| 0d 58 3d 78 6d 69 6e 28 | 6e 29 0d 1f e0 1b ec 20 |.X=xmin(|n)..... |
|00005f30| 58 2a 58 73 2c a0 28 62 | 61 73 69 63 76 24 28 6e |X*Xs,.(b|asicv$(n|
|00005f40| 29 29 2a 59 73 0d 1f ea | 26 e3 20 58 3d 78 6d 69 |))*Ys...|&. X=xmi|
|00005f50| 6e 28 6e 29 20 b8 20 78 | 6d 61 78 28 6e 29 20 88 |n(n) . x|max(n) .|
|00005f60| 20 58 72 2f 70 6f 69 6e | 74 73 25 0d 1f f4 2f e7 | Xr/poin|ts%.../.|
|00005f70| 20 53 71 72 6c 70 25 20 | 59 3d 2d a0 28 62 61 73 | Sqrlp% |Y=-.(bas|
|00005f80| 69 63 76 24 28 6e 29 29 | 20 8b 20 59 3d a0 28 62 |icv$(n))| . Y=.(b|
|00005f90| 61 73 69 63 76 24 28 6e | 29 29 0d 1f fe 0f df 20 |asicv$(n|))..... |
|00005fa0| 58 2a 58 73 2c 59 2a 59 | 73 0d 20 08 5d e7 20 28 |X*Xs,Y*Y|s. .]. (|
|00005fb0| 53 71 72 25 3d 2d 31 20 | 80 20 58 3e 78 6d 61 78 |Sqr%=-1 |. X>xmax|
|00005fc0| 28 6e 29 2d 58 72 2f 31 | 30 30 30 20 80 20 53 71 |(n)-Xr/1|000 . Sq|
|00005fd0| 72 6c 70 25 3d 30 29 20 | 8c 20 58 3d 78 6d 69 6e |rlp%=0) |. X=xmin|
|00005fe0| 28 6e 29 3a 53 71 72 6c | 70 25 3d 2d 31 3a ec 20 |(n):Sqrl|p%=-1:. |
|00005ff0| 58 2a 58 73 2c 2d a0 28 | 62 61 73 69 63 76 24 28 |X*Xs,-.(|basicv$(|
|00006000| 6e 29 29 2a 59 73 0d 20 | 12 05 ed 0d 20 1c 09 ef |n))*Ys. |.... ...|
|00006010| 32 36 3a e1 0d 20 26 05 | 3a 0d 20 30 10 dd a4 73 |26:.. &.|:. 0...s|
|00006020| 63 61 6c 65 28 61 2c 62 | 29 0d 20 3a 1a e7 20 62 |cale(a,b|). :.. b|
|00006030| 2d 61 3c 32 30 20 80 20 | 62 2d 61 3e 3d 35 20 8c |-a<20 . |b-a>=5 .|
|00006040| 20 3d 31 0d 20 44 17 e7 | 20 62 2d 61 3c 35 20 8c | =1. D..| b-a<5 .|
|00006050| 20 3d 28 62 2d 61 29 2f | 32 30 0d 20 4e 0b ea 20 | =(b-a)/|20. N.. |
|00006060| 73 2c 74 2c 75 0d 20 58 | 0f 73 3d 28 62 2d 61 29 |s,t,u. X|.s=(b-a)|
|00006070| 20 81 32 30 0d 20 62 0e | 74 3d 28 73 20 81 32 29 | .20. b.|t=(s .2)|
|00006080| 2a 32 0d 20 6c 0e 75 3d | 28 73 20 81 35 29 2a 35 |*2. l.u=|(s .5)*5|
|00006090| 0d 20 76 23 e7 20 74 3e | 75 20 80 20 75 3c 3e 30 |. v#. t>|u . u<>0|
|000060a0| 20 8c 20 3d 75 20 8b 20 | e7 20 74 3c 3e 30 20 8c | . =u . |. t<>0 .|
|000060b0| 20 3d 74 0d 20 80 0d 3d | 28 62 2d 61 29 2f 32 30 | =t. ..=|(b-a)/20|
|000060c0| 0d 20 8a 05 3a 0d 20 94 | 18 dd f2 73 65 74 5f 76 |. ..:. .|...set_v|
|000060d0| 61 72 69 61 62 6c 65 28 | 61 24 2c 6e 29 0d 20 9e |ariable(|a$,n). .|
|000060e0| 12 e7 20 61 24 3d 22 41 | 22 20 8c 20 41 3d 6e 0d |.. a$="A|" . A=n.|
|000060f0| 20 a8 12 e7 20 61 24 3d | 22 42 22 20 8c 20 42 3d | ... a$=|"B" . B=|
|00006100| 6e 0d 20 b2 12 e7 20 61 | 24 3d 22 43 22 20 8c 20 |n. ... a|$="C" . |
|00006110| 43 3d 6e 0d 20 bc 12 e7 | 20 61 24 3d 22 44 22 20 |C=n. ...| a$="D" |
|00006120| 8c 20 44 3d 6e 0d 20 c6 | 12 e7 20 61 24 3d 22 45 |. D=n. .|.. a$="E|
|00006130| 22 20 8c 20 45 3d 6e 0d | 20 d0 12 e7 20 61 24 3d |" . E=n.| ... a$=|
|00006140| 22 46 22 20 8c 20 46 3d | 6e 0d 20 da 12 e7 20 61 |"F" . F=|n. ... a|
|00006150| 24 3d 22 47 22 20 8c 20 | 47 3d 6e 0d 20 e4 12 e7 |$="G" . |G=n. ...|
|00006160| 20 61 24 3d 22 48 22 20 | 8c 20 48 3d 6e 0d 20 ee | a$="H" |. H=n. .|
|00006170| 12 e7 20 61 24 3d 22 49 | 22 20 8c 20 49 3d 6e 0d |.. a$="I|" . I=n.|
|00006180| 20 f8 12 e7 20 61 24 3d | 22 4a 22 20 8c 20 4a 3d | ... a$=|"J" . J=|
|00006190| 6e 0d 21 02 12 e7 20 61 | 24 3d 22 4b 22 20 8c 20 |n.!... a|$="K" . |
|000061a0| 4b 3d 6e 0d 21 0c 12 e7 | 20 61 24 3d 22 4c 22 20 |K=n.!...| a$="L" |
|000061b0| 8c 20 4c 3d 6e 0d 21 16 | 12 e7 20 61 24 3d 22 4d |. L=n.!.|.. a$="M|
|000061c0| 22 20 8c 20 4d 3d 6e 0d | 21 20 12 e7 20 61 24 3d |" . M=n.|! .. a$=|
|000061d0| 22 4e 22 20 8c 20 4e 3d | 6e 0d 21 2a 12 e7 20 61 |"N" . N=|n.!*.. a|
|000061e0| 24 3d 22 4f 22 20 8c 20 | 4f 3d 6e 0d 21 34 12 e7 |$="O" . |O=n.!4..|
|000061f0| 20 61 24 3d 22 50 22 20 | 8c 20 50 3d 6e 0d 21 3e | a$="P" |. P=n.!>|
|00006200| 12 e7 20 61 24 3d 22 51 | 22 20 8c 20 51 3d 6e 0d |.. a$="Q|" . Q=n.|
|00006210| 21 48 12 e7 20 61 24 3d | 22 52 22 20 8c 20 52 3d |!H.. a$=|"R" . R=|
|00006220| 6e 0d 21 52 12 e7 20 61 | 24 3d 22 53 22 20 8c 20 |n.!R.. a|$="S" . |
|00006230| 53 3d 6e 0d 21 5c 12 e7 | 20 61 24 3d 22 54 22 20 |S=n.!\..| a$="T" |
|00006240| 8c 20 54 3d 6e 0d 21 66 | 12 e7 20 61 24 3d 22 55 |. T=n.!f|.. a$="U|
|00006250| 22 20 8c 20 55 3d 6e 0d | 21 70 12 e7 20 61 24 3d |" . U=n.|!p.. a$=|
|00006260| 22 56 22 20 8c 20 56 3d | 6e 0d 21 7a 12 e7 20 61 |"V" . V=|n.!z.. a|
|00006270| 24 3d 22 57 22 20 8c 20 | 57 3d 6e 0d 21 84 12 e7 |$="W" . |W=n.!...|
|00006280| 20 61 24 3d 22 5a 22 20 | 8c 20 5a 3d 6e 0d 21 8e | a$="Z" |. Z=n.!.|
|00006290| 05 e1 0d 21 98 05 3a 0d | 21 a2 10 dd f2 63 61 6c |...!..:.|!....cal|
|000062a0| 63 75 6c 61 74 6f 72 0d | 21 ac 08 ea 20 61 24 0d |culator.|!... a$.|
|000062b0| 21 b6 38 db 3a f2 74 69 | 74 6c 65 3a ef 32 38 2c |!.8.:.ti|tle:.28,|
|000062c0| 32 2c 33 30 2c 37 36 2c | 31 3a f1 22 3c 52 65 74 |2,30,76,|1:."<Ret|
|000062d0| 75 72 6e 3e 20 74 6f 20 | 72 65 74 75 72 6e 20 74 |urn> to |return t|
|000062e0| 6f 20 6d 65 6e 75 22 0d | 21 c0 0d 40 25 3d 26 39 |o menu".|!..@%=&9|
|000062f0| 30 41 3a f5 0d 21 ca 13 | e8 22 45 76 61 6c 75 61 |0A:..!..|."Evalua|
|00006300| 74 65 3a 20 22 61 24 0d | 21 d4 17 e7 20 61 24 3c |te: "a$.|!... a$<|
|00006310| 3e 22 22 20 f1 22 3d 22 | 3b a0 28 61 24 29 0d 21 |>"" ."="|;.(a$).!|
|00006320| de 0b fd 20 61 24 3d 22 | 22 0d 21 e8 11 40 25 3d |... a$="|".!..@%=|
|00006330| 26 34 30 41 3a ef 32 36 | 3a e1 0d 21 f2 05 3a 0d |&40A:.26|:..!..:.|
|00006340| 21 fc 15 dd f2 64 69 66 | 66 65 72 65 6e 74 69 61 |!....dif|ferentia|
|00006350| 74 69 6f 6e 0d 22 06 05 | e1 0d 22 10 05 3a 0d 22 |tion."..|.."..:."|
|00006360| 1a 11 dd f2 69 6e 74 65 | 67 72 61 74 69 6f 6e 0d |....inte|gration.|
|00006370| 22 24 1a db 3a f2 74 69 | 74 6c 65 3a ef 32 38 2c |"$..:.ti|tle:.28,|
|00006380| 32 2c 33 30 2c 37 36 2c | 31 0d 22 2e 26 f1 20 a4 |2,30,76,|1.".&. .|
|00006390| 63 65 6e 74 72 65 28 22 | 49 20 4e 20 54 20 45 20 |centre("|I N T E |
|000063a0| 47 20 52 20 41 20 54 20 | 49 20 4f 20 4e 22 29 0d |G R A T |I O N").|
|000063b0| 22 38 5d f1 27 22 54 68 | 65 20 67 65 6e 65 72 61 |"8].'"Th|e genera|
|000063c0| 6c 20 72 75 6c 65 20 66 | 6f 72 20 74 68 65 20 69 |l rule f|or the i|
|000063d0| 6e 74 65 67 72 61 74 69 | 6f 6e 20 6f 66 20 61 6e |ntegrati|on of an|
|000063e0| 79 20 66 75 6e 63 74 69 | 6f 6e 20 6f 66 20 74 68 |y functi|on of th|
|000063f0| 65 20 66 6f 72 6d 20 78 | 22 3b bd 28 70 6f 77 65 |e form x|";.(powe|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
